| line |
true |
false |
branch |
|
268
|
0 |
17 |
unless defined $variable |
|
272
|
3 |
14 |
if ($type =~ /(SCALAR|REF)/) { } |
|
|
5 |
9 |
elsif ($type =~ /ARRAY/) { } |
|
|
9 |
0 |
elsif ($type =~ /HASH/) { } |
|
318
|
3 |
14 |
if ($type =~ /(SCALAR|REF)/) { } |
|
|
5 |
9 |
elsif ($type =~ /ARRAY/) { } |
|
|
9 |
0 |
elsif ($type =~ /HASH/) { } |
|
339
|
0 |
0 |
defined $_[0]{$_[1]}[1] ? : |
|
353
|
0 |
0 |
if scalar @_ >= 2 |
|
371
|
0 |
0 |
&reftype($_[1]) ne '' ? : |
|
|
0 |
0 |
defined $_[1] ? : |
|
387
|
0 |
0 |
unless $type =~ /(SCALAR|REF)/ |
|
390
|
0 |
0 |
if ($type =~ /(SCALAR|REF)/) { } |
|
|
0 |
0 |
elsif ($type =~ /ARRAY/) { } |
|
|
0 |
0 |
elsif ($type =~ /HASH/) { } |
|
395
|
0 |
0 |
if $shadow |
|
399
|
0 |
0 |
if $shadow |
|
449
|
51 |
151 |
if $arg =~ /variable|debug|shadow/ |
|
452
|
17 |
134 |
if ($ref =~ /CODE/) { } |
|
|
0 |
134 |
elsif (not $ref =~ /ARRAY/) { } |
|
477
|
0 |
3 |
if $watch_obj->{'-debug'} |
|
509
|
5 |
0 |
if $shadow |
|
510
|
5 |
0 |
$shadow ? : |
|
513
|
0 |
5 |
if $watch_obj->{'-debug'} |
|
535
|
0 |
0 |
if $n == 2 |
|
536
|
0 |
0 |
if $n == 3 |
|
537
|
0 |
0 |
if $n >= 4 |
|
573
|
9 |
0 |
if $shadow |
|
574
|
9 |
0 |
$shadow ? : |
|
577
|
0 |
9 |
if $watch_obj->{'-debug'} |