| line |
true |
false |
branch |
|
60
|
0 |
0 |
unless -e $file_name |
|
64
|
0 |
0 |
if ('File::MMagic'->new->checktype_filename($file_name) eq 'text/plain') { } |
|
66
|
0 |
0 |
unless open my $FILE, '<', $file_name |
|
73
|
0 |
0 |
unless $separator |
|
78
|
0 |
0 |
$pre_parse && @lines > 5 ? : |
|
79
|
0 |
0 |
unless $_ and $_ =~ s/^['"]// |
|
84
|
0 |
0 |
unless $struct |
|
88
|
0 |
0 |
$pre_parse && @{$content[1];} > 7 ? : |
|
96
|
0 |
0 |
if ($$params{'patterns'}) { } |
|
|
0 |
0 |
elsif ($$params{'fields'}) { } |
|
|
0 |
0 |
elsif ($$params{'substitute'}) { } |
|
110
|
0 |
0 |
wantarray ? : |
|
118
|
0 |
0 |
if ($$title[$i] =~ /$pattern/) |
|
119
|
0 |
0 |
if (ref $$patterns{$pattern}) { } |
|
121
|
0 |
0 |
if ($$title[$i] =~ /$subpattern/) |
|
140
|
0 |
0 |
if ($$title[$i] eq $field) |