Branch Coverage

blib/lib/mods.pm
Criterion Covered Total %
branch 12 26 46.1


line true false branch
17 5 0 unless ($list and not @$list)
19 0 5 $un ? :
29 0 1 if (@in == 1 and not $in[0] =~ /[^0-9.]/)
30 0 0 if ($mods::VERSION < $in[0]) { }
39 1 0 unless ($in =~ s/^\s*~//)
79 1 3 if ($1) { }
1 2 elsif ($6) { }
0 2 elsif ($8) { }
0 2 elsif ($10) { }
2 0 elsif ($12) { }
82 0 1 $list ? :
94 0 0 unless grep {$_ eq 'Exporter';} @{"${callpack}::ISA";}
96 0 0 s/!$// ? :