| line |
true |
false |
branch |
|
28
|
4 |
0 |
if (@args) { } |
|
41
|
6 |
4 |
unless (&Encode::is_utf8($text)) |
|
46
|
10 |
0 |
unless $no_print |
|
56
|
0 |
4 |
unless ($content) |
|
57
|
0 |
0 |
unless $self->logger |
|
89
|
0 |
0 |
unless $dir->exists and $dir->is_dir |
|
92
|
0 |
0 |
if $file->is_dir |
|
97
|
0 |
0 |
if defined $found{$basename} |
|
104
|
0 |
0 |
if $class eq 'CLI::Dispatch::Command' |
|
110
|
0 |
0 |
$podfile->exists ? : |
|
117
|
0 |
0 |
if ($pmfile->exists) |
|
119
|
0 |
0 |
if $loaded |
|
121
|
0 |
0 |
unless eval "require $class" |
|
123
|
0 |
0 |
if ($error) { } |
|
|
0 |
0 |
elsif ($class->can('check')) { } |
|
124
|
0 |
0 |
if ($error =~ /^Can't locate /) { } |
|
141
|
0 |
0 |
unless $loaded |
|
145
|
0 |
0 |
if $maxlength < $len |
|
186
|
0 |
3 |
unless $self->option('_namespaces') |
|
197
|
1 |
3 |
if ($command =~ s/^\+//) { } |
|
209
|
3 |
23 |
if $file->exists |
|
218
|
4 |
1 |
if $caller[0] =~ /^CLI::Dispatch(::.+)?$/ |
|
219
|
0 |
1 |
if $seen{$caller[0]}++ |
|
223
|
1 |
0 |
if ($content =~ /=head1\s+\S+\s+$package/s) |