| line |
true |
false |
branch |
|
128
|
1 |
199 |
unless $args{'-variable'} |
|
135
|
1273 |
1509 |
if $type ne "CODE" |
|
137
|
775 |
734 |
if ($methods->{$_}) { } |
|
161
|
44 |
155 |
if ($type =~ /(SCALAR|REF)/) { } |
|
|
62 |
93 |
elsif ($type =~ /ARRAY/) { } |
|
|
93 |
0 |
elsif ($type =~ /HASH/) { } |
|
211
|
44 |
155 |
if ($type =~ /(SCALAR|REF)/) { } |
|
|
62 |
93 |
elsif ($type =~ /ARRAY/) { } |
|
|
93 |
0 |
elsif ($type =~ /HASH/) { } |
|
258
|
199 |
199 |
unless $var |
|
261
|
0 |
199 |
unless $type |
|
264
|
155 |
44 |
unless $type =~ /(SCALAR|REF)/ |
|
268
|
44 |
155 |
if ($type =~ /(SCALAR|REF)/) { } |
|
|
62 |
93 |
elsif ($type =~ /ARRAY/) { } |
|
|
93 |
0 |
elsif ($type =~ /HASH/) { } |
|
273
|
61 |
1 |
if $shadow and $copy |
|
277
|
93 |
0 |
if $shadow |
|
313
|
1072 |
182 |
$watch_obj->{'-clone'} ? : |
|
315
|
1172 |
0 |
if ($METHODS{$id} and $METHODS{$id}{$mkey}) |
|
330
|
0 |
82 |
if wantarray |
|
375
|
62 |
0 |
if $shadow |
|
376
|
62 |
0 |
$shadow ? : |
|
397
|
0 |
0 |
if $n == 2 |
|
398
|
0 |
0 |
if $n == 3 |
|
399
|
0 |
0 |
if $n >= 4 |
|
433
|
93 |
0 |
if $shadow |
|
434
|
93 |
0 |
$shadow ? : |