line |
true |
false |
branch |
32
|
14 |
4 |
if (UNIVERSAL::isa(\$file, 'SCALAR')) { } |
34
|
0 |
14 |
unless open FILE, "$file" |
49
|
1 |
17 |
if ($@) { } |
50
|
0 |
1 |
unless $SILENT |
55
|
0 |
116 |
if ($state < 0) { } |
|
0 |
116 |
elsif ($state == 0) { } |
67
|
14 |
3 |
if ($openfile) |
68
|
0 |
17 |
if $abort |
76
|
2 |
6 |
if (wantarray) { } |
|
6 |
0 |
elsif (defined wantarray) { } |
83
|
9 |
19 |
if (&$coderef($file, $pos, $_)) |
98
|
15 |
45 |
if (&$coderef($file, $pos, $_)) |
109
|
0 |
0 |
if (&$coderef($file, $pos, $_)) { } |
125
|
0 |
0 |
if (&$coderef($file, $pos, $_)) |
139
|
0 |
0 |
if (&$coderef($file, $pos, $_)) |