line |
true |
false |
branch |
67
|
0 |
0 |
unless $self->has_no_command
|
92
|
0 |
0 |
if @$argv
|
94
|
0 |
0 |
unless $self->has_no_command
|
102
|
0 |
0 |
if @$argv
|
104
|
0 |
0 |
unless $self->has_no_command
|
118
|
0 |
0 |
if $opts->{'help'}
|
119
|
0 |
0 |
if $opts->{'man'}
|
133
|
0 |
0 |
if ($o->can('opt_spec'))
|
141
|
0 |
0 |
if $opts->{'help'}
|
142
|
0 |
0 |
if $opts->{'man'}
|
149
|
0 |
0 |
if ($o->can('validate_args'))
|
157
|
0 |
0 |
if ($o->can('validate_opts'))
|
177
|
0 |
0 |
if $@
|
179
|
0 |
0 |
unless my $command_class_path = $INC{$command_pm}
|
188
|
0 |
0 |
if (@$argv and exists $$command_map{$argv->[0]})
|
199
|
0 |
0 |
unless ($command_class->can('execute'))
|
203
|
0 |
0 |
if ($command_class->can('subcommand_map'))
|
216
|
0 |
0 |
unless scalar @argv
|
218
|
0 |
0 |
if ($command_map_bultin{$argv[0]}) { }
|
|
0 |
0 |
elsif ($command_map{$argv[0]}) { }
|
|
0 |
0 |
elsif ($argv[0] =~ /^-/u) { }
|