line |
true |
false |
branch |
40
|
1 |
1 |
if lc((split(/\n+/, $para, 0))[0]) =~ /^\s*name/xi |
45
|
0 |
6 |
unless $line =~ /.+:.+/ |
47
|
0 |
6 |
unless defined $k and defined $v |
48
|
0 |
6 |
if $k =~ /^\s*$/ or $v =~ /^\s*$/ |
49
|
0 |
6 |
if (defined $h{$k}) |
58
|
1 |
1 |
if ($isa_entry) { } |
74
|
0 |
1 |
unless ref $in eq 'HASH' |
84
|
0 |
1 |
unless (defined $$manifest{'main'}{'Manifest-Version'}) |
104
|
0 |
1 |
unless $name_attr |
158
|
0 |
24 |
unless defined $val |
167
|
0 |
7 |
unless defined $val |
176
|
0 |
6 |
unless $attr =~ /^[-0-9a-zA-Z_]+$/ |
180
|
0 |
6 |
unless $attr =~ /[a-zA-Z0-9]+/ |
183
|
0 |
6 |
if length $attr > 70 |
208
|
0 |
0 |
unless grep({/-/;} $a) <=> grep({/-/;} $b) |