line |
true |
false |
branch |
22
|
0 |
0 |
@_ == 1 ? :
|
24
|
0 |
0 |
defined $args{'inline'} ? :
|
25
|
0 |
0 |
defined $args{'indent'} ? :
|
26
|
0 |
0 |
defined $args{'braces'} ? :
|
27
|
0 |
0 |
defined $args{'level'} ? :
|
49
|
0 |
0 |
$no_curlies ? :
|
|
0 |
0 |
$no_curlies ? :
|
51
|
0 |
0 |
if ($braces eq 'bsd') { }
|
|
0 |
0 |
elsif ($braces eq 'k&r') { }
|
53
|
0 |
0 |
$no_curlies ? :
|
57
|
0 |
0 |
unless $no_curlies
|
61
|
0 |
0 |
defined $args{'braces'} ? :
|
65
|
0 |
0 |
$no_curlies ? :
|
68
|
0 |
0 |
if (defined $inline_limit and length $inline_perl > $inline_limit)
|
73
|
0 |
0 |
$inline ? :
|
78
|
0 |
0 |
@_ == 1 ? :
|
80
|
0 |
0 |
defined $args{'inline'} ? :
|
81
|
0 |
0 |
defined $args{'indent'} ? :
|
82
|
0 |
0 |
defined $args{'braces'} ? :
|
83
|
0 |
0 |
defined $args{'level'} ? :
|
105
|
0 |
0 |
if ($braces eq 'bsd') { }
|
|
0 |
0 |
elsif ($braces eq 'k&r') { }
|
115
|
0 |
0 |
defined $args{'braces'} ? :
|
121
|
0 |
0 |
if (defined $inline_limit and length $inline_perl > $inline_limit)
|
126
|
0 |
0 |
$inline ? :
|
131
|
0 |
0 |
@_ == 1 ? :
|
137
|
0 |
0 |
if (my $ref = ref $value)
|
139
|
0 |
0 |
if ($ref eq 'ARRAY') { }
|
|
0 |
0 |
elsif ($ref eq 'HASH') { }
|
167
|
0 |
0 |
if length $name > $max_len
|
168
|
0 |
0 |
if length $name < $min_len or $min_len < 0
|
178
|
0 |
0 |
if $key =~ /^\d+$/
|
182
|
0 |
0 |
if /'/
|
183
|
0 |
0 |
if /\W/
|
195
|
0 |
0 |
if /'/
|
196
|
0 |
0 |
unless /^(?:[1-9]\d*\.?\d*|\.\d+)$/
|