| line |
true |
false |
branch |
|
57
|
0 |
0 |
unless -e $file_name
|
|
61
|
0 |
0 |
if ('File::MMagic'->new->checktype_filename($file_name) eq 'text/plain') { }
|
|
63
|
0 |
0 |
unless open my $FILE, '<', $file_name
|
|
70
|
0 |
0 |
unless $separator
|
|
75
|
0 |
0 |
$pre_parse && @lines > 5 ? :
|
|
76
|
0 |
0 |
unless $_ and $_ =~ s/^['"]//
|
|
81
|
0 |
0 |
unless $struct
|
|
85
|
0 |
0 |
$pre_parse && @{$content[1];} > 7 ? :
|
|
93
|
0 |
0 |
if ($$params{'patterns'}) { }
|
|
|
0 |
0 |
elsif ($$params{'fields'}) { }
|
|
|
0 |
0 |
elsif ($$params{'substitute'}) { }
|
|
107
|
0 |
0 |
wantarray ? :
|
|
115
|
0 |
0 |
if ($$title[$i] =~ /$pattern/)
|
|
116
|
0 |
0 |
if (ref $$patterns{$pattern}) { }
|
|
118
|
0 |
0 |
if ($$title[$i] =~ /$subpattern/)
|
|
137
|
0 |
0 |
if ($$title[$i] eq $field)
|