| line |
true |
false |
branch |
|
32
|
1 |
0 |
if (-f $save_fn) |
|
40
|
15 |
6 |
if ($k =~ /::$/) { } |
|
|
6 |
0 |
elsif (ref $$tree{$k}) { } |
|
68
|
1 |
376 |
if $k =~ /main::$/ |
|
69
|
171 |
205 |
if $k =~ /[^\w:]/ |
|
70
|
53 |
152 |
if grep(($_ eq $k), @stop_modules) |
|
71
|
56 |
96 |
if ($k =~ /::$/) { } |
|
|
1 |
95 |
elsif (*{$package . $k;}{'HASH'}) { } |
|
|
2 |
93 |
elsif (*{$package . $k;}{'ARRAY'}) { } |
|
|
85 |
8 |
elsif (*{$package . $k;}{'CODE'}) { } |
|
75
|
27 |
29 |
if exists $INC{$modulepath} |
|
83
|
85 |
0 |
unless $wantcoderefs |
|
87
|
0 |
0 |
$$rootop ? : |
|
88
|
0 |
0 |
if ($$rootop and $stashname eq $package || 'main::' . $stashname eq $package || $stashname eq 'main::') |
|
93
|
8 |
0 |
unless ref *{$package . $k;}{'SCALAR'} eq 'GLOB' |
|
107
|
0 |
1 |
unless Storable::nstore($tree, $save_fn . '.new') |
|
112
|
0 |
1 |
unless rename $save_fn . '.new', $save_fn |