| line |
true |
false |
branch |
|
12
|
6 |
0 |
unless ($ENV{'PERL_SUB_IDENTIFY_PP'}) |
|
19
|
0 |
6 |
if $@ and not $@ =~ /object version|loadable object/ |
|
21
|
6 |
0 |
unless $@ |
|
26
|
0 |
6 |
if ($is_pure_perl) |
|
71
|
0 |
5 |
if defined *{"${callpkg}::try_to_use";}{'CODE'} and sub_fullname(*{"${callpkg}::try_to_use";}{'CODE'}) eq 'Class::Easy::__ANON__' |
|
95
|
1 |
50 |
if @_ == 1 or @_ == 3 |
|
98
|
0 |
51 |
if scalar @_ % 2 |
|
104
|
24 |
27 |
if exists $config{'default'} |
|
107
|
18 |
33 |
if defined $default and $is eq 'ro' |
|
112
|
0 |
51 |
if (delete $config{'_unless_exists'} and defined *{$full_ref;}{'CODE'}) |
|
117
|
38 |
13 |
if $is eq 'ro' |
|
118
|
13 |
38 |
if $is eq 'rw' |
|
120
|
0 |
51 |
unless $is =~ /^r[ow]$/ |
|
123
|
13 |
38 |
if (ref $default eq 'CODE') { } |
|
|
14 |
24 |
elsif ($config{'global'}) { } |
|
134
|
12 |
6 |
if $c == 1 |
|
135
|
1 |
5 |
if $c ^ $mode |
|
145
|
12 |
9 |
if $c == 1 |
|
146
|
2 |
7 |
if $c ^ $mode |
|
175
|
1 |
16 |
if ($use_lib) { } |
|
176
|
0 |
1 |
if exists $INC{$path} |
|
181
|
2 |
14 |
if (eval "scalar grep {!/\\w+::/} keys %${package}::;" > 0) |
|
188
|
9 |
6 |
if ($@) |
|
189
|
7 |
2 |
unless $quiet |
|
232
|
19 |
75 |
if ($real_package eq $module) { } |
|
|
23 |
52 |
elsif ($real_sub eq '__ANON__') { } |
|
242
|
4 |
3 |
wantarray ? : |
|
250
|
2 |
1 |
if ref $module |
|
257
|
0 |
3 |
if ($] < 5.009005) { } |
|
273
|
0 |
3 |
wantarray ? : |