| line |
true |
false |
branch |
|
29
|
0 |
77 |
if $class eq 'POSIX::1003::Module' |
|
34
|
0 |
77 |
unless my $tags = \%{"${class}::EXPORT_TAGS";} |
|
39
|
77 |
0 |
unless (keys %$ok) |
|
43
|
2 |
75 |
@_ && $_[0] =~ /^\+(\d+)$/ ? : |
|
44
|
21 |
56 |
if @_ == 1 and $_[0] eq ':none' |
|
45
|
11 |
45 |
unless @_ |
|
49
|
12 |
84 |
if ($_ eq ':all') { } |
|
|
2 |
82 |
elsif (/^:(.*)/) { } |
|
53
|
0 |
2 |
unless my $tag = $$tags{$1} |
|
57
|
0 |
82 |
unless is_missing $_ or exists $$ok{$_} |
|
68
|
163 |
569 |
if (exists ${$class . '::';}{$f} and $export = *{"${class}::$f";}{'CODE'}) { } |
|
|
484 |
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'}) { } |
|
79
|
0 |
0 |
if (exists $main::POSIX::{$f} and defined *{"POSIX::$f";}{'CODE'}) { } |
|
83
|
0 |
0 |
defined $const ? : |
|
116
|
0 |
0 |
unless my $tags = \%{"${pkg}::EXPORT_TAGS";} |
|
118
|
0 |
0 |
unless grep(($_ eq $name), @$constants) |
|
122
|
0 |
0 |
defined $val ? : |