| line |
true |
false |
branch |
|
201
|
2 |
12 |
unless reftype($$args{'metaref'}) eq 'HASH' and not keys %{$$args{'metaref'};} |
|
202
|
1 |
11 |
unless reftype($$args{'rules'}) eq 'ARRAY' |
|
237
|
2 |
6 |
unless defined $dataprocess and reftype $dataprocess eq 'CODE' |
|
248
|
0 |
9 |
unless open my $FILE, '<', $$self{'file'} |
|
251
|
12 |
84 |
if $l =~ /^#/ |
|
253
|
62 |
22 |
if (not $header_seen) { } |
|
254
|
9 |
53 |
if ($l eq '') { } |
|
258
|
2 |
51 |
unless $l =~ /^(.+?)$$self{'header_split'}(.*)$/ |
|
265
|
4 |
62 |
unless (&{$$r{'rule'};}) |
|
269
|
3 |
19 |
if scalar @{$exception;} |
|
270
|
13 |
6 |
if defined $dataprocess |
|
274
|
0 |
9 |
unless close $FILE |