| line |
true |
false |
branch |
|
120
|
5 |
49 |
if ($config{'file'}) { } |
|
|
38 |
11 |
elsif ($config{'string'}) { } |
|
173
|
2 |
10 |
if (ref $file eq 'GLOB') { } |
|
|
1 |
9 |
elsif (eval {
do {
$file->isa('IO::File')
}
}) { } |
|
|
4 |
5 |
elsif (ref $file eq 'IO::Scalar') { } |
|
|
4 |
1 |
elsif (not ref $file) { } |
|
175
|
1 |
1 |
unless $$self{'_FILEHANDLE'} |
|
194
|
1 |
3 |
unless $$self{'_FILEHANDLE'} |
|
218
|
20 |
0 |
if defined $line |
|
230
|
12 |
0 |
if ($temp_buffer =~ /(\cM\cJ|\cM|\cJ)/) { } |
|
233
|
4 |
8 |
if $$self{'_IRS'} eq "\r" |
|
234
|
1 |
11 |
if $$self{'_IRS'} eq "\r\n" |
|
235
|
7 |
5 |
if $$self{'_IRS'} eq "\n" |
|
309
|
2 |
5923 |
if ($$self{'_BINARY_DATA'}) |
|
317
|
3 |
5920 |
if ($$self{'_PUT_TOKEN_CACHE_FLAG'}) |
|
328
|
2919 |
3001 |
$$self{'_WHITESPACE'} ? : |
|
337
|
234 |
5721 |
if ($start_character =~ /$non_text_re/) { } |
|
|
5200 |
521 |
elsif ($start_character eq '\\') { } |
|
|
224 |
297 |
elsif ($start_character eq '{') { } |
|
|
225 |
72 |
elsif ($start_character eq '}') { } |
|
|
38 |
34 |
elsif (not $start_character) { } |
|
349
|
167 |
74 |
if defined $1 |
|
357
|
7 |
234 |
if (not $$self{'_BUFFER'} and $$self{'_FILEHANDLE'}) |
|
359
|
7 |
0 |
if $$self{'_BUFFER'} |
|
364
|
124 |
110 |
unless ($$self{'_WHITESPACE'}) |
|
379
|
2 |
5196 |
if ($$self{'_TEMP_ESCAPE_FLAG'}) { } |
|
396
|
37 |
1 |
unless $$self{'_FILEHANDLE'} |
|
400
|
0 |
1 |
if $$self{'_FILEHANDLE'}->eof |
|
402
|
0 |
1 |
unless $$self{'_BUFFER'} |
|
421
|
34 |
5788 |
if $$token[0] eq 'eof' |
|
458
|
1 |
1 |
if ($bool) { } |
|
487
|
1 |
3 |
if (@_) |
|
536
|
2581 |
2619 |
$$self{'_WHITESPACE'} ? : |
|
542
|
59 |
5141 |
if ($$self{'_BUFFER'} =~ s/^\*//) { } |
|
|
5118 |
23 |
elsif ($$self{'_BUFFER'} =~ s/$whitespace_re//) { } |
|
|
10 |
13 |
elsif ($$self{'_BUFFER'} =~ s/^'([0-9a-f]{2})//i) { } |
|
|
1 |
12 |
elsif ($$self{'_BUFFER'} =~ s/^([-_~:|{}'\\])//) { } |
|
|
3 |
9 |
elsif ($$self{'_BUFFER'} =~ s/^[\r\n]//) { } |
|
|
0 |
9 |
elsif ($$self{'_BUFFER'} =~ s/^\t//) { } |
|
|
0 |
9 |
elsif ($$self{'_BUFFER'} =~ s/^\;//) { } |
|
|
4 |
5 |
elsif ($$self{'_BUFFER'} =~ s/^u(\d+)//) { } |
|
|
2 |
6 |
elsif ($$self{'_SLOPPY'} and $$self{'_BUFFER'} =~ s/^([a-z]{1,32})(-?\d+)//i) { } |
|
549
|
2812 |
2306 |
if defined $2 |
|
552
|
2549 |
2569 |
if ($$self{'_WHITESPACE'}) |
|
553
|
2549 |
0 |
defined $3 ? : |
|
556
|
5114 |
4 |
unless $1 eq 'bin' |
|
565
|
1 |
9 |
if $$self{'_NOTE_ESCAPES'} |
|
570
|
1 |
0 |
if $$self{'_NOTE_ESCAPES'} |
|
597
|
2 |
0 |
if defined $2 |
|
627
|
2 |
0 |
if (not $$self{'_FILEHANDLE'} or $$self{'_FILEHANDLE'}->eof) |