| blib/lib/Devel/PerlySense/CallTree/Caller.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 10 | 70.0 |
| line | true | false | branch |
|---|---|---|---|
| 42 | 0 | 56 | unless $self->normal_line =~ / ^ (\s*) /x |
| 49 | 0 | 19 | unless $self->caller =~ /([\w:]+)->([\w]+)/ |
| 56 | 0 | 19 | unless $self->caller =~ /([\w:]+)->([\w]+)/ |
| 66 | 2 | 56 | unless $self->normal_line =~ /([\w:]+)->([\w]+)/ |
| 73 | 2 | 93 | unless my $id = $self->caller |