| line |
true |
false |
branch |
|
17
|
0 |
11 |
if ($] < 5.008007) { } |
|
25
|
0 |
11 |
unless eval "\nsub stash_for (\$) {\n $provider->new(\$_[0]);\n}\n\n1;\n\n" |
|
127
|
1006 |
1001 |
if ($args[0] =~ /^\-/) { } |
|
138
|
1002 |
14 |
exists $args{-'cleanee'} ? : |
|
139
|
1001 |
15 |
if ($is_explicit) { } |
|
155
|
2 |
2 |
ref $args{-'except'} eq 'ARRAY' ? : |
|
|
4 |
11 |
$args{-'except'} ? : |
|
160
|
5 |
72 |
if $except{$f} |
|
161
|
0 |
72 |
unless $stash->has_symbol("&$f") |
|
166
|
14 |
1 |
unless ($store->{'handler_is_installed'}) |
|
181
|
0 |
1 |
exists $args{-'cleanee'} ? : |
|
188
|
1 |
1 |
if $store->{'remove'}{$f} or $store->{'exclude'}{$f} |
|
199
|
14 |
2 |
unless $stash->has_symbol($var) |