| line |
true |
false |
branch |
|
11
|
11 |
0 |
defined &B::GVf_IMPORTED_CV ? : |
|
95
|
0 |
40 |
if ref $class |
|
99
|
52 |
388 |
exists $args{$_} ? : |
|
102
|
4 |
36 |
if (exists $args{'private'} or exists $args{'also_private'}) |
|
106
|
54 |
2 |
ref $_ ? : |
|
|
1 |
3 |
exists $args{'also_private'} ? : |
|
112
|
0 |
40 |
unless my $package = $new->{'package'} |
|
114
|
1 |
39 |
unless (eval {
do {
require (__pack_to_pm($package));
1
}
}) |
|
130
|
1 |
50 |
if $self->{'broken'} |
|
139
|
3 |
35 |
unless (grep $_, values %symbols) |
|
149
|
1 |
41 |
unless my $symbols = $self->symbols |
|
152
|
1 |
40 |
unless my $total = scalar keys %$symbols |
|
166
|
0 |
7 |
unless my $symbols = $self->symbols |
|
178
|
0 |
2 |
unless my $symbols = $self->symbols |
|
188
|
0 |
2 |
unless defined $rating |
|
194
|
2 |
0 |
if (@uncovered) |
|
210
|
9 |
0 |
unless @_ |
|
212
|
0 |
0 |
@_ == 1 ? : |
|
222
|
76 |
0 |
unless @search |
|
233
|
76 |
18314 |
$search eq 'main::' ? : |
|
258
|
38 |
0 |
$package->can('DOES') ? : |
|
|
0 |
38 |
$package->can('does') ? : |
|
273
|
0 |
90 |
unless $package =~ /\A$PACKAGE_RE\z/ |
|
282
|
0 |
50 |
if ($self->package eq $package and defined $self->{'pod_from'}) |
|
287
|
0 |
50 |
unless my $full = $INC{$mod} |
|
289
|
48 |
0 |
-e $full ? : |
|
|
2 |
48 |
-e $maybe_pod ? : |
|
294
|
38 |
12 |
if ($self->package eq $package) |
|
307
|
38 |
0 |
if $self->{'trust_roles'} |
|
309
|
38 |
0 |
if $self->{'trust_parents'} |
|
319
|
1 |
49 |
if ($self->{'nonwhitespace'}) |
|
328
|
19 |
38 |
if $self->{'_parsed'} |
|
334
|
50 |
0 |
$pod ? : |
|
342
|
4 |
34 |
if ($self->{'require_link'}) |
|
353
|
2 |
0 |
exists $parsed{$_} ? : |
|
370
|
1 |
37 |
if ($self->{'export_only'}) { } |
|
379
|
196 |
0 |
if ($self->{'trust_imported'}) |
|
380
|
3 |
193 |
if (B::svref_2object(\*{$package . '::' . $sym;})->GvFLAGS & 128) |
|
386
|
78 |
115 |
if $self->_private_check($sym) |
|
446
|
0 |
3 |
unless my $gv = $cv->GV |
|
448
|
3 |
0 |
if ($gv->can('object_2svref')) { } |