| line |
true |
false |
branch |
|
11
|
0 |
0 |
if (UNIVERSAL::isa($layout, 'HASH')) { } |
|
17
|
0 |
0 |
if $layout |
|
29
|
0 |
0 |
if (defined $count) { } |
|
44
|
0 |
0 |
if $lazy |
|
45
|
0 |
0 |
$3 ? : |
|
|
0 |
0 |
if $] < 5.008 |
|
59
|
0 |
0 |
unless $format eq 'a*' |
|
64
|
0 |
0 |
if (defined(my $count = $$self{'Count'}[$i])) { } |
|
65
|
0 |
0 |
unless $count |
|
68
|
0 |
0 |
if ($count eq '*') |
|
73
|
0 |
0 |
if ($group) { } |
|
75
|
0 |
0 |
if $$self{'Format'}[$i] =~ /(X+)/ |
|
77
|
0 |
0 |
if ($lazy and $i == $#{$$self{'Names'};}) |
|
78
|
0 |
0 |
unless my $format = $$self{'Format'}[$i] |
|
79
|
0 |
0 |
unless $format =~ s/^\((.*?)\)\*$/$1/ |
|
82
|
0 |
0 |
if @flds and length $flds[0] |
|
91
|
0 |
0 |
if $pad |
|
94
|
0 |
0 |
if $count_idx >= $count |
|
111
|
0 |
0 |
$parent->can('valid_unformat') ? : |
|
121
|
0 |
0 |
if ($valid_sub and not $done and not $_[0]->valid_unformat(\@content, \$chunk, $done)) |
|
127
|
0 |
0 |
if $pad |
|
140
|
0 |
0 |
if ($$self{'Count'}[$i]) { } |
|
141
|
0 |
0 |
ref $_ ? : |
|
143
|
0 |
0 |
if (ref $$rec{$name} eq 'ARRAY') { } |
|
144
|
0 |
0 |
if (@{$$rec{$name};}) |