Branch Coverage

blib/lib/No/PersonNr.pm
Criterion Covered Total %
branch 16 36 44.4


line true false branch
55 0 12 unless defined $nr
57 0 12 if $nr =~ /\D/
58 0 12 if length $nr != 11
69 0 24 if $sum % 11
79 0 12 if $date[1] > 40
83 0 12 if $date[2] > 40
92 12 0 if ($pnr < 500) { }
0 0 elsif ($pnr >= 750) { }
100 0 0 if ($date[0] > 54) { }
108 0 12 unless _is_legal_date(@date)
110 3 9 $returndate ? :
117 0 12 if $d < 1
118 0 12 if $m < 1 or $m > 12
121 0 12 if ($m == 2) { }
12 0 elsif ($m == 4 or $m == 6 or $m == 9 or $m == 11) { }
122 0 0 $y % 4 == 0 && $y % 100 != 0 || $y % 400 == 0 ? :
127 0 12 if $d > $mdays
142 0 6 unless $nr