line |
true |
false |
branch |
54
|
3 |
6 |
if ($_[0] // '') =~ /^(false|off|no)$/iu |
66
|
24 |
1 |
unless ref $val |
100
|
2 |
14 |
@_ && ref $_[0] ? : |
101
|
8 |
8 |
@_ ? : |
104
|
4 |
12 |
if (substr($val, 0, 1) eq "\n") |
113
|
6 |
12 |
if ($line =~ /^(?\h+)\S/mu) { } |
|
10 |
2 |
elsif ($line =~ /\S/u) { } |
122
|
6 |
10 |
if defined $ws |
124
|
2 |
14 |
if $extra_trim |
126
|
2 |
14 |
$initial_NL && !$extra_trim ? : |
154
|
1 |
744 |
unless my $hrIn = shift() |
155
|
1 |
743 |
unless ref $hrIn eq 'HASH' |
157
|
742 |
1 |
if ref $_[0] eq 'HASH' |
161
|
400 |
883 |
unless exists $hrIn->{$name} |
163
|
1 |
882 |
$hrOpts->{'lc'} ? : |
164
|
880 |
3 |
if $hrOpts->{'-'} |