| line |
true |
false |
branch |
|
24
|
1 |
4 |
if (delete $args{'-dumper'}) |
|
34
|
9 |
0 |
if ($export_all or exists $args{$f} and $args{$f}) |
|
69
|
2 |
15 |
if (my $ref = ref $arg) { } |
|
73
|
0 |
2 |
if (defined($proto = $seen->{$refaddr})) { } |
|
|
0 |
2 |
elsif ($ref eq 'ARRAY') { } |
|
|
2 |
0 |
elsif ($ref eq 'HASH') { } |
|
|
0 |
0 |
elsif ($ref eq 'REF' or $ref eq 'SCALAR') { } |
|
95
|
12 |
3 |
if (_can_exec($arg)) { } |
|
96
|
1 |
11 |
$FLAG_STR ? : |
|
104
|
15 |
0 |
wantarray ? : |
|
110
|
1 |
11 |
if (ref $BEFORE_HOOK eq 'CODE') |
|
116
|
1 |
11 |
if (ref $AFTER_HOOK eq 'CODE') |
|
126
|
0 |
15 |
unless defined $value |
|
130
|
1 |
14 |
$flags & 12288 && !($flags & 16384) ? : |
|
136
|
0 |
15 |
unless defined $arg |
|
137
|
1 |
14 |
if $DO_NOT_PROCESS_NUMERIC_VALUE and _is_number($arg) |
|
138
|
11 |
3 |
if &Encode::is_utf8($arg) |
|
139
|
1 |
0 |
unless $CHECK_ALREADY_ENCODED or &Encode::is_utf8($arg) |