| line |
true |
false |
branch |
|
29
|
0 |
78 |
if $class eq 'POSIX::1003::Module' |
|
34
|
0 |
78 |
unless my $tags = \%{"${class}::EXPORT_TAGS";} |
|
39
|
78 |
0 |
unless (keys %$ok) |
|
43
|
2 |
76 |
@_ && $_[0] =~ /^\+(\d+)$/ ? : |
|
44
|
21 |
57 |
if @_ == 1 and $_[0] eq ':none' |
|
45
|
11 |
46 |
unless @_ |
|
49
|
12 |
86 |
if ($_ eq ':all') { } |
|
|
3 |
83 |
elsif (/^:(.*)/) { } |
|
53
|
0 |
3 |
unless my $tag = $$tags{$1} |
|
57
|
0 |
83 |
unless is_missing $_ or exists $$ok{$_} |
|
68
|
166 |
595 |
if (exists ${$class . '::';}{$f} and $export = *{"${class}::$f";}{'CODE'}) { } |
|
|
510 |
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_]/) { } |
|
|
21 |
64 |
elsif ($f =~ s/^%//) { } |
|
|
35 |
29 |
elsif ($in_core and grep(($f eq $_), @$in_core)) { } |
|
|
29 |
0 |
elsif (exists $main::POSIX::{$f} and defined *{"POSIX::$f";}{'CODE'}) { } |
|
80
|
0 |
0 |
if (exists $main::POSIX::{$f} and defined *{"POSIX::$f";}{'CODE'}) { } |
|
84
|
0 |
0 |
defined $const ? : |
|
117
|
0 |
0 |
unless my $tags = \%{"${pkg}::EXPORT_TAGS";} |
|
119
|
0 |
0 |
unless grep(($_ eq $name), @$constants) |
|
123
|
0 |
0 |
defined $val ? : |