| line |
true |
false |
branch |
|
58
|
60 |
0 |
unless @args
|
|
64
|
0 |
0 |
unless $ok{$name}
|
|
65
|
0 |
0 |
unless defined &{$name;}
|
|
67
|
0 |
0 |
if defined &{$target;}
|
|
76
|
0 |
0 |
unless @args
|
|
77
|
0 |
0 |
ishref($args[0]) ? :
|
|
83
|
0 |
90 |
@args % 2 ? :
|
|
87
|
0 |
90 |
if DEBUG()
|
|
93
|
0 |
1620 |
unless $class->can($fid)
|
|
96
|
74 |
1546 |
defined $fval ? :
|
|
133
|
0 |
90 |
if $bogus_args
|
|
134
|
0 |
90 |
if not isaref($d) or $#{$d;} != 1
|
|
135
|
0 |
90 |
if length $$d[0] < 2
|
|
136
|
0 |
90 |
if length $$d[1] < 2
|
|
137
|
0 |
90 |
if $$d[0] =~ /\s/msx
|
|
138
|
0 |
90 |
if $$d[1] =~ /\s/msx
|
|
149
|
0 |
90 |
if $$self[28] and not iscref($$self[28])
|
|
152
|
0 |
90 |
if $$self[30] and not isaref($$self[30])
|
|
159
|
4 |
86 |
if ($$self[9])
|
|
160
|
0 |
4 |
unless $$self[9] = $self->io->validate('dir', $$self[9])
|
|
172
|
2 |
674 |
$type eq 'array' ? :
|
|
|
88 |
676 |
$type eq 'hash' ? :
|
|
179
|
88 |
676 |
if $type eq 'self'
|
|
196
|
0 |
0 |
unless ($ok)
|
|
213
|
0 |
0 |
if $stderr
|
|
222
|
0 |
0 |
if DEBUG()
|