| line |
true |
false |
branch |
|
135
|
1 |
17 |
unless @_ |
|
139
|
1 |
16 |
unless scalar(@_) % 2 == 0 |
|
140
|
8 |
8 |
if @_ |
|
142
|
15 |
1 |
if (-f $filename) |
|
144
|
0 |
15 |
unless $$self{'FH'}->open($filename) |
|
145
|
15 |
0 |
if $$self{'FH'} |
|
149
|
1 |
15 |
unless $$self{'FH'} |
|
226
|
11 |
1229 |
if ($index > $#{$$self{'OFFSETS'};}) |
|
232
|
525 |
715 |
if /^HASH$/ |
|
233
|
525 |
190 |
if /^ARRAY$/ |
|
253
|
14 |
1 |
if $$self{'FH'} |
|
288
|
0 |
2358 |
if $index > $#{$$self{'OFFSETS'};} |
|
289
|
0 |
2358 |
unless $$self{'FH'} |
|
291
|
1133 |
1225 |
if ($index == $#{$$self{'OFFSETS'};}) { } |
|
292
|
1130 |
3 |
unless $$self{'EOF'} |
|
293
|
1130 |
3 |
if (defined $out) |
|
306
|
0 |
11 |
unless $$self{'FH'} |
|
307
|
2 |
9 |
if $$self{'EOF'} |
|
308
|
0 |
9 |
if $index <= $#{$$self{'OFFSETS'};} |
|
311
|
0 |
195 |
if $$self{'EOF'} |
|
320
|
1225 |
1130 |
if $length and $fh->read($line, $length) |
|
326
|
0 |
1130 |
unless (defined $c) |
|
328
|
0 |
0 |
length $line ? : |
|
332
|
1116 |
14 |
if (defined $nl and $nl eq $c || !($nl =~ /^[\x0A\x0D]$/)) { } |
|
|
0 |
14 |
elsif (defined $nl and $nl ne $c) { } |