| line |
true |
false |
branch |
|
72
|
1 |
1 |
unless ($self->parse($file)) |
|
123
|
0 |
2 |
$$self{'age'} ? : |
|
140
|
1 |
1 |
unless (open IN, $file) |
|
171
|
1 |
9 |
if ($body =~ /\G$key_table_re/cg) { } |
|
|
2 |
7 |
elsif ($body =~ /\G$value_table_re/cog) { } |
|
|
2 |
5 |
elsif ($body =~ /\G$table_re/cog) { } |
|
|
0 |
5 |
elsif ($body =~ /\G$row_re/cog) { } |
|
|
2 |
3 |
elsif ($body =~ /\G$section_begin_re/cog) { } |
|
|
2 |
1 |
elsif ($section_end_re and $body =~ /\G$section_end_re/cg) { } |
|
|
1 |
0 |
elsif ($body =~ /\G$top_level_comment/cog) { } |
|
172
|
0 |
1 |
unless $self->parse_key_table($1) |
|
176
|
0 |
2 |
unless $self->parse_value_table($1) |
|
180
|
0 |
2 |
unless $self->parse_table($1) |
|
184
|
0 |
0 |
unless $self->parse_table($1) |
|
206
|
0 |
1 |
if ($$self{'section_end_re'}) |
|
260
|
0 |
7 |
unless scalar @cells |
|
266
|
0 |
7 |
$$self{'row_hash'}{$id} ? : |
|
271
|
0 |
35 |
unless $_ |
|
279
|
0 |
35 |
unless defined $vali |
|
284
|
0 |
35 |
unless defined $key |
|
286
|
5 |
30 |
$which eq '=' ? : |
|
290
|
12 |
23 |
if ($key eq 'LastVisitDate' or $key eq 'FirstVisitDate') |
|
299
|
0 |
7 |
if ($$self{'age'} and ($hash{'LastVisitDate'} || $$self{'since'}) < $$self{'since'}) |
|
319
|
0 |
2 |
unless $val_part |
|
327
|
29 |
29 |
unless /[^\s]/s |
|
330
|
0 |
29 |
unless (defined $val) |
|
336
|
1 |
28 |
if (not defined $$self{'byte_order'} and $val =~ /(?:BE|LE)/) |
|
342
|
6 |
23 |
if ($val =~ /\$/) |
|
343
|
6 |
0 |
if (defined $$self{'byte_order'}) { } |
|
377
|
13 |
13 |
unless /[^\s]/s |
|
379
|
0 |
13 |
unless defined $val |
|
411
|
51 |
0 |
if $$self{'verbose'} < $level |
|
412
|
0 |
0 |
$message eq '' ? : |
|
586
|
0 |
14 |
if @_ |