line |
true |
false |
branch |
75
|
1 |
8 |
if ($Emit eq 'carp') { } |
|
2 |
6 |
elsif ($Emit eq 'croak') { } |
|
5 |
1 |
elsif ($Emit eq 'print') { } |
|
0 |
1 |
elsif (ref $Emit =~ /CODE/) { } |
92
|
1 |
0 |
if ($emit =~ /(carp|croak|print)/) |
124
|
1 |
1 |
if ($DUMPER) { } |
126
|
0 |
0 |
@vars ? : |
131
|
0 |
1 |
$i++ ? : |
147
|
2 |
8 |
if ($type =~ /^($ref=)?HASH/) { } |
|
1 |
7 |
elsif ($type =~ /^($ref=)?ARRAY/) { } |
|
0 |
7 |
elsif ($type =~ /^($ref=)?SCALAR/) { } |
157
|
1 |
9 |
if ($tabn - $TABLEN == -1) |
174
|
0 |
6 |
if (ref $elem) { } |
191
|
5 |
2 |
unless ($scalar =~ /\d+/) |
239
|
7 |
0 |
if ($orig =~ /\s*my\s*[\@\$\%]/) |
244
|
3 |
4 |
if ($orig =~ /(=|\+\+|--)/) |
249
|
0 |
0 |
unless $pre or $post |
266
|
1 |
2 |
if ($ok) |
298
|
0 |
3 |
if $value |
306
|
4 |
11 |
if ($$object{'name'} =~ /^\@/) { } |
|
7 |
4 |
elsif ($$object{'name'} =~ /^\$/) { } |
|
4 |
0 |
elsif ($$object{'name'} =~ /^\%/) { } |
333
|
4 |
11 |
if ($$object{'name'} =~ /^\@/) { } |
|
7 |
4 |
elsif ($$object{'name'} =~ /^\$/) { } |
|
4 |
0 |
elsif ($$object{'name'} =~ /^\%/) { } |
365
|
0 |
2 |
$value ? : |
376
|
0 |
2 |
$value ? : |
394
|
0 |
0 |
if $$object{'value'}{$key} |