| line |
true |
false |
branch |
|
19
|
0 |
11 |
if ($] < 5.008007) { } |
|
27
|
0 |
11 |
unless eval "\nsub stash_for (\$) {\n $provider->new(\$_[0]);\n}\n\n1;\n\n" |
|
136
|
1006 |
1001 |
if ($args[0] =~ /^\-/) { } |
|
147
|
1002 |
14 |
exists $args{-'cleanee'} ? : |
|
148
|
1001 |
15 |
if ($is_explicit) { } |
|
164
|
2 |
2 |
ref $args{-'except'} eq 'ARRAY' ? : |
|
|
4 |
11 |
$args{-'except'} ? : |
|
169
|
5 |
72 |
if $except{$f} |
|
170
|
0 |
72 |
unless $stash->has_symbol("&$f") |
|
175
|
14 |
1 |
unless ($store->{'handler_is_installed'}) |
|
190
|
0 |
1 |
exists $args{-'cleanee'} ? : |
|
197
|
1 |
1 |
if $store->{'remove'}{$f} or $store->{'exclude'}{$f} |
|
208
|
14 |
2 |
unless $stash->has_symbol($var) |