| line |
true |
false |
branch |
|
22
|
0 |
8 |
if $main::DB::{'disable_profile'} and not $ENV{'MP_WRITE_NYTPROF'} |
|
23
|
4 |
4 |
if $initial_cfg |
|
25
|
0 |
6 |
if $main::DB::{'enable_profile'} and not $ENV{'MP_WRITE_NYTPROF'} |
|
30
|
0 |
6 |
if (defined $nsstash->{'__CONFIG__'}) |
|
45
|
0 |
8 |
if (substr($key, -2, 2) eq '::') { } |
|
62
|
6 |
7 |
$ns ? : |
|
70
|
12 |
1 |
if $sub |
|
72
|
1 |
12 |
unless ($ok) |
|
74
|
0 |
1 |
if $err =~ /Error-prone code/u |
|
75
|
1 |
0 |
unless ref $err |
|
89
|
19 |
5 |
if (index($directive, 'namespace') == 0) { } |
|
|
5 |
0 |
elsif ($directive eq 'include') { } |
|
90
|
2 |
17 |
if $directive eq "namespace-abs" |
|
91
|
4 |
15 |
$ns ? : |
|
92
|
17 |
2 |
if $rest =~ /\s*(\S+)/u |
|
105
|
5 |
0 |
if ($curpkg ne "NS") |
|
110
|
5 |
0 |
if $dir and not $file->is_absolute |
|
112
|
1 |
4 |
if (index($file, '*') >= 0) { } |
|
124
|
0 |
23 |
if defined $config->{'assign_proc'} |
|
126
|
8 |
83 |
if $key eq "BEGIN" or $key eq "DESTROY" or $key eq "AUTOLOAD" or index($key, "__ANON__") == 0 |
|
127
|
18 |
65 |
if (substr($key, -2, 2) eq "::") |
|
131
|
0 |
65 |
unless my $glob = $stash->{$key} |
|
132
|
0 |
65 |
if not defined $$glob and defined *$glob{"CODE"} |
|
133
|
0 |
65 |
if (defined $assign_proc) { } |
|
144
|
8 |
10 |
$ns ? : |
|
145
|
1 |
17 |
if (exists $dest->{$subns}) |