| line |
true |
false |
branch |
|
57
|
7 |
52 |
if ($help) |
|
63
|
52 |
4 |
if $instance |
|
68
|
4 |
0 |
if $instance |
|
82
|
31 |
36 |
if $package->can('new') |
|
85
|
18 |
18 |
unless eval "require $package" |
|
87
|
18 |
18 |
unless $error |
|
90
|
15 |
3 |
if $error =~ /Can't locate $file/ |
|
94
|
7 |
4 |
if ($command eq 'Help') |
|
113
|
59 |
0 |
unless ($class = ref $self) |
|
118
|
29 |
30 |
unless (grep {$_ ne $class;} @namespaces) |
|
128
|
20 |
36 |
if ($command->isa('CLI::Dispatch::Help') and @ARGV) |
|
132
|
3 |
53 |
if $command->can('check') |
|
140
|
0 |
9 |
unless ($package->can('new')) |
|
142
|
0 |
0 |
unless eval "require $package" |
|
144
|
0 |
0 |
if $error |
|
148
|
9 |
0 |
unless ($class = ref $self) |
|
155
|
1 |
8 |
if ($global{'help'}) |
|
164
|
0 |
9 |
if $command->can('check') |