| line |
true |
false |
branch |
|
33
|
0 |
78 |
if $class eq 'POSIX::1003::Module' |
|
38
|
0 |
78 |
unless my $tags = \%{"${class}::EXPORT_TAGS";} |
|
43
|
78 |
0 |
unless (keys %$ok) |
|
47
|
2 |
76 |
@_ && $_[0] =~ /^\+(\d+)$/ ? : |
|
48
|
21 |
57 |
if @_ == 1 and $_[0] eq ':none' |
|
49
|
11 |
46 |
unless @_ |
|
53
|
12 |
87 |
if ($_ eq ':all') { } |
|
|
3 |
84 |
elsif (/^:(.*)/) { } |
|
57
|
0 |
3 |
unless my $tag = $tags->{$1} |
|
61
|
0 |
84 |
unless &is_missing($_) or exists $ok->{$_} |
|
72
|
171 |
607 |
if (exists do {
$class . '::'
}->{$f} and $export = *{"${class}::$f";}{'CODE'}) { } |
|
|
522 |
85 |
elsif (&is_missing($f) or exists $ok->{$f} and $f =~ /^[A-Z_][A-Za-z0-9_]*$/) { } |
|
|
0 |
85 |
elsif (not $f =~ /[^A-Z0-9_]/) { } |
|
|
22 |
63 |
elsif ($f =~ s/^%//) { } |
|
|
35 |
28 |
elsif ($in_core and grep(($f eq $_), @$in_core)) { } |
|
|
28 |
0 |
elsif (exists $main::POSIX::{$f} and defined *{"POSIX::$f";}{'CODE'}) { } |
|
84
|
0 |
0 |
if (exists $main::POSIX::{$f} and defined *{"POSIX::$f";}{'CODE'}) { } |
|
88
|
0 |
0 |
defined $const ? : |
|
121
|
0 |
0 |
unless my $tags = \%{"${pkg}::EXPORT_TAGS";} |
|
123
|
0 |
0 |
unless grep(($_ eq $name), @$constants) |
|
127
|
0 |
0 |
defined $val ? : |