Branch Coverage

lib/Gentoo/PerlMod/Version.pm
Criterion Covered Total %
branch 34 40 85.0


line true false branch
19 1 67 unless (defined $perlver)
22 49 18 unless defined $$config{'lax'}
23 0 67 if (_env_hasopt('always_lax'))
27 46 21 if ($perlver =~ /\Av?[\d.]+\z/msx)
31 13 8 if ($perlver =~ /\Av?[\d._]+(-TRIAL)?\z/msx)
32 11 2 if ($$config{'lax'} > 0)
38 6 2 if (2 == $$config{'lax'})
62 1 24 unless (exists $$char_map{$char})
79 0 14 unless (@tokens)
82 4 10 if (@tokens < 2)
124 5 12 if ($version =~ s/-TRIAL\z//msx)
127 6 11 if ($version =~ s/_(.*)\z/$1/msx)
130 1 5 if ($prereleasever =~ /_/msx)
135 10 6 if ($isdev)
151 0 6 if ($version =~ s/-TRIAL\z//msx)
154 0 6 if ($version =~ s/\Av//msx)
161 12 18 if (/\A[_.]\z/msx)
165 12 6 if (/\A\d\z/msx)
173 0 6 if ($istrial)
176 0 6 if ($has_v)