| line |
true |
false |
branch |
|
56
|
1 |
35 |
if $arg eq '-storable' |
|
57
|
1 |
34 |
if $arg eq '-dumper' |
|
58
|
0 |
34 |
if $arg eq '-destroy' |
|
59
|
6 |
28 |
if $arg =~ /^STORABLE_/ |
|
60
|
2 |
32 |
if $arg eq 'Dumper' |
|
61
|
2 |
32 |
ref $arg ? : |
|
62
|
5 |
29 |
if ($type and ref $type and $ref_tab{reftype $type}) { } |
|
|
1 |
56 |
elsif ($type and $type eq 'NOAUTO') { } |
|
71
|
15 |
4 |
if $storable |
|
72
|
16 |
3 |
if $dumper |
|
73
|
0 |
19 |
if not is_xs() and $destroy |
|
80
|
7 |
24 |
if $client->isa($base) |
|
110
|
1 |
1 |
if (ref $obj) { } |
|
131
|
0 |
1 |
unless $type eq reftype $to |
|
133
|
0 |
1 |
unless my $trans = $trans_tab{$type} |
|
159
|
0 |
4 |
if $cloning |
|
160
|
2 |
2 |
unless $running = !$running |