Branch Coverage

blib/lib/App/Greple/type.pm
Criterion Covered Total %
branch 0 16 0.0


line true false branch
177 0 0 if ($opt{'negative'})
180 0 0 unless my(@to) = $module->getopt($from)
181 0 0 unless $from =~ s/^--type/--no-type/u
183 0 0 unless s/^--(?=suffix|select|shebang)/--x-/gu
184 0 0 if (grep {s/^--(?=type-)/--no-/u unless s/^--(?=suffix|select|shebang)/--x-/gu;} @to)
193 0 0 if ($opt{'short'})
196 0 0 unless $opt =~ /^--(?(no-)?)type-(?.+)/u
200 0 0 if $opt{'dump'}