| line |
true |
false |
branch |
|
86
|
0 |
1 |
if @options > 1 |
|
104
|
0 |
1 |
unless exists $subs{$option} |
|
109
|
0 |
1 |
if ($option eq '-off') { } |
|
135
|
0 |
2 |
unless my $dieproc = $Module::Check_Args::_PROCS{scalar caller} |
|
139
|
0 |
2 |
unless @_ == 1 |
|
142
|
1 |
1 |
unless (@DB::args == $argcount) |
|
161
|
0 |
3 |
unless my $dieproc = $Module::Check_Args::_PROCS{scalar caller} |
|
163
|
0 |
3 |
unless @_ == 2 |
|
166
|
2 |
1 |
unless (@DB::args >= $minargs and @DB::args <= $maxargs) |
|
185
|
0 |
2 |
unless my $dieproc = $Module::Check_Args::_PROCS{scalar caller} |
|
187
|
0 |
2 |
unless @_ == 1 |
|
190
|
1 |
1 |
unless (@DB::args >= $minargs) |
|
211
|
0 |
2 |
unless my $dieproc = $Module::Check_Args::_PROCS{scalar caller} |
|
213
|
0 |
2 |
unless @_ == 1 |
|
216
|
1 |
1 |
unless (@DB::args <= $maxargs) |