| line |
true |
false |
branch |
|
66
|
1 |
6 |
unless @_ |
|
71
|
1 |
5 |
unless ($mod_version) |
|
73
|
1 |
0 |
if ($@) |
|
84
|
4 |
17 |
if ($arg eq ':void') { } |
|
88
|
4 |
13 |
$arg =~ /::/ ? : |
|
114
|
2 |
6 |
if $arg eq ':void' |
|
116
|
0 |
6 |
$arg =~ /::/ ? : |
|
145
|
0 |
17 |
if grep {not defined $_;} @args{'exception', 'name', 'pkg', 'sub'} |
|
147
|
0 |
17 |
unless $args{'name'} =~ /^\w+$/ |
|
152
|
4 |
13 |
$args{'void'} ? : |
|
153
|
8 |
9 |
if (defined $Fatalized_Functions{$cache_key} and defined $Not_Fatalized_Functions{$args{'sub'}}) { } |
|
|
4 |
5 |
elsif (defined &{$args{'sub'};} and not eval {
do {
prototype "CORE::$args{'name'}"
}
}) { } |
|
162
|
2 |
2 |
unless defined $Not_Fatalized_Functions{$args{'sub'}} |
|
172
|
1 |
4 |
unless $proto |
|
177
|
2 |
2 |
unless (defined &{$args{'sub'};}) |
|
191
|
0 |
2 |
if $Debug |
|
193
|
0 |
2 |
if (@_ == 1) { } |
|
|
0 |
2 |
elsif (@_ == 2) { } |
|
|
2 |
0 |
elsif (@_ == 3) { } |
|
194
|
0 |
2 |
if ($@) |
|
201
|
0 |
2 |
if $Debug |
|
206
|
2 |
2 |
unless (defined $Not_Fatalized_Functions{$args{'sub'}}) |
|
211
|
4 |
4 |
if (defined $proto) { } |
|
219
|
6 |
2 |
unless defined $argvs |
|
222
|
2 |
6 |
$args{'void'} ? : |
|
234
|
0 |
8 |
if $Debug |
|
236
|
0 |
0 |
defined wantarray ? : |
|
|
0 |
0 |
defined wantarray ? : |
|
|
0 |
3 |
defined wantarray ? : |
|
|
0 |
4 |
if (@_ == 1) { } |
|
|
0 |
4 |
elsif (@_ == 2) { } |
|
|
3 |
1 |
elsif (@_ == 3) { } |
|
|
0 |
0 |
defined wantarray ? : |
|
|
0 |
0 |
defined wantarray ? : |
|
|
0 |
3 |
defined wantarray ? : |
|
|
0 |
3 |
if (@_ == 1) { } |
|
|
0 |
3 |
elsif (@_ == 2) { } |
|
|
3 |
0 |
elsif (@_ == 3) { } |
|
|
2 |
2 |
defined wantarray ? : |
|
|
3 |
5 |
defined wantarray ? : |
|
|
0 |
1 |
defined wantarray ? : |
|
|
0 |
3 |
defined wantarray ? : |
|
|
0 |
1 |
defined wantarray ? : |
|
|
0 |
5 |
defined wantarray ? : |
|
237
|
0 |
8 |
if ($@) |
|
244
|
0 |
8 |
if $Debug |
|
262
|
0 |
6 |
if grep {not defined $_;} @args{'name', 'pkg', 'sub'} |
|
264
|
0 |
6 |
unless $args{'name'} =~ /^\w+$/ |
|
269
|
2 |
4 |
unless defined $Not_Fatalized_Functions{$args{'sub'}} |
|
285
|
4 |
12 |
if ($seen_semi) |
|
288
|
0 |
16 |
if ($proto =~ s/^\s*\\([\@%\$\&])//) |
|
292
|
8 |
8 |
if ($proto =~ s/^\s*([*\$&])//) |
|
296
|
6 |
2 |
if ($proto =~ s/^\s*(;\s*)?\@//) |
|
300
|
2 |
0 |
if ($proto =~ s/^\s*;//) |
|
328
|
0 |
10 |
if grep {not defined $_;} @args{'argvs', 'call', 'exception', 'name'} |
|
334
|
7 |
3 |
if (@argvs == 1) { } |
|
389
|
0 |
16 |
if grep {not defined $_;} @args{'argv', 'call', 'exception', 'name'} |
|
395
|
4 |
12 |
if ($args{'orig'}) { } |
|
|
2 |
10 |
elsif ($args{'void'}) { } |