| line |
true |
false |
branch |
|
19
|
0 |
40 |
unless $$a[1] cmp $$b[1] |
|
20
|
40 |
0 |
$_ ne '__MAIN__' ? : |
|
28
|
2 |
0 |
if (my $h = $OPT{-'output'}) |
|
29
|
0 |
2 |
if (ref $h eq 'GLOB') { } |
|
32
|
0 |
2 |
unless open FH, ">$h" |
|
39
|
2 |
0 |
if $OPT{-'test'} |
|
64
|
2 |
0 |
if (not $OPT{-'iscalled'}) { } |
|
80
|
10 |
70 |
if ($op->name eq 'gv' and $op->next and $op->next->name eq 'entersub') |
|
87
|
8 |
2 |
if ($op->gv->STASH->NAME eq $name or $op->gv->STASH->NAME eq 'main') { } |
|
108
|
64 |
0 |
if ($op->name eq 'method_named' and $op->next and $op->next->name eq 'entersub') |
|
121
|
20 |
0 |
if (funcs($$calls{$caller}) or not $OPT{-'filter_empty'}) |
|
126
|
32 |
5 |
if ($targ->is_method) |
|
148
|
0 |
0 |
if ($_->name =~ /$pat/o) |
|
154
|
0 |
0 |
if (keys %notfound) |
|
162
|
0 |
0 |
$$_[1]->is_method ? : |
|
173
|
0 |
2 |
unless $OPT{-'include'} |
|
178
|
2210 |
40 |
if /$patbad/o and not /$patgood/o |
|
185
|
40 |
0 |
/(.+)::/ ? : |
|
198
|
0 |
0 |
unless $$a[1] cmp $$b[1] |
|
200
|
0 |
0 |
$_ ne '__MAIN__' ? : |
|
206
|
1 |
1 |
unless defined $file |
|
208
|
0 |
1 |
unless (my $err = do $file) |
|
209
|
0 |
0 |
if $@ |
|
210
|
0 |
0 |
unless defined $err |
|
228
|
0 |
80 |
unless $_[0] |