| line |
true |
false |
branch |
|
57
|
0 |
0 |
if $_[0] =~ /^(false|off|no)$/iu |
|
58
|
0 |
0 |
if $_[0] =~ /^0$/u |
|
70
|
1 |
0 |
unless ref $val |
|
104
|
0 |
0 |
@_ && ref $_[0] ? : |
|
105
|
0 |
0 |
@_ ? : |
|
108
|
0 |
0 |
if ($val =~ /\A\n/u) |
|
113
|
0 |
0 |
if ($val =~ /^(?\h+)\S/mu) |
|
117
|
0 |
0 |
if $extra_trim |
|
119
|
0 |
0 |
$initial_NL && !$extra_trim ? : |
|
147
|
0 |
63 |
unless my $hrIn = shift() |
|
148
|
0 |
63 |
unless ref $hrIn eq 'HASH' |
|
150
|
63 |
0 |
if ref $_[0] eq 'HASH' |
|
154
|
72 |
53 |
unless exists $hrIn->{$name} |
|
156
|
0 |
53 |
$hrOpts->{'lc'} ? : |
|
157
|
53 |
0 |
if $hrOpts->{'-'} |
|
176
|
0 |
0 |
if (not defined $ref) { } |
|
|
0 |
0 |
elsif (not &refaddr($ref)) { } |
|
|
0 |
0 |
elsif (&blessed($ref)) { } |
|
198
|
0 |
0 |
if ($got_desc ne $exp_desc) |
|
202
|
0 |
0 |
unless (defined $got) |
|
210
|
0 |
0 |
if ($got_addr != $exp_addr) |