Branch Coverage

blib/lib/App/perlminlint.pm
Criterion Covered Total %
branch 0 68 0.0


line true false branch
71 0 0 if ($app->{'help'} or not @$argv)
77 0 0 if ($app->{'no_stderr'})
82 0 0 unless $app->{'no_auto_libdir'}
85 0 0 if (@res) { }
86 0 0 unless @res == 1 and ($res[0] // '') eq ''
105 0 0 unless -e (my $fn = 'App::perlminlint'->catdir(@dirs, $lookfor))
107 0 0 if &$code($_ = $fn)
119 0 0 if (not $self->{'_lib_dict'}{$libdir})
127 0 0 if (-d $libdir)
133 0 0 if (-d $carton)
151 0 0 if ($self->{'verbose'})
156 0 0 if ($@)
161 0 0 if (not $yaml->[0] and ref $yaml->[0] eq 'HASH')
171 0 0 if ($fn =~ /\P{ASCII}/ and not &is_utf8($fn))
178 0 0 if (my $obj = $self->apply_to($plugin, 'handle_match', $fn)) { }
0 0 elsif ($plugin->is_generic) { }
180 0 0 unless my(@res) = $obj->handle_test($fn)
191 0 0 unless (@fallback)
197 0 0 unless my(@res) = $self->apply_to($plugin, 'handle_test', $fn)
216 0 0 wantarray ? :
222 0 0 unless $self->{'no_widechar'}
223 0 0 unless $self->{'no_force_strict'}
226 0 0 if ($self->{'verbose'} or $self->{'dryrun'})
229 0 0 if ($self->{'dryrun'})
232 0 0 unless system($^X, @opts, @_) == 0
259 0 0 if (not defined $_[0]) { }
0 0 elsif (not ref $_[0]) { }
260 0 0 wantarray ? :
278 0 0 if (@modpath)
293 0 0 if (grep {$_ eq '-T';} @shbang)
302 0 0 unless my($shbang) = $_[0] =~ /^(\#![^\n]+)/
313 0 0 if ($special_re and $list->[0] =~ /$special_re/) { }
0 0 elsif (my($k, $v) = $list->[0] =~ /^--?(\w[-\w]*)(?:=(.*))?/) { }
318 0 0 if $opt eq ''