Branch Coverage

blib/lib/Person/ID/CZ/RC.pm
Criterion Covered Total %
branch 20 24 83.3


line true false branch
30 1 30 unless (defined $self->{'rc'})
108 9 10 if ($checksum == 10)
111 18 1 if ($self->{'checksum'} == $checksum) { }
123 19 11 if ($self->{'rc'} =~ m[^(\d\d)(\d\d)(\d\d)/(\d\d\d)(\d)$]ms or $self->{'rc'} =~ /^(\d\d)(\d\d)(\d\d)(\d\d\d)(\d)$/ms) { }
1 10 elsif ($self->{'rc'} =~ m[^(\d\d)(\d\d)(\d\d)/(\d\d\d)$]ms or $self->{'rc'} =~ /^(\d\d)(\d\d)(\d\d)(\d\d\d)$/ms) { }
127 0 19 if ($2 > 70) { }
0 19 elsif ($2 > 50) { }
8 11 elsif ($2 > 20) { }
156 0 1 if ($2 > 50) { }
166 0 1 if ($self->{'year'} <= 1953) { }
189 18 12 if ($self->{'validity'})
197 1 17 if ($Person::ID::CZ::RC::EVAL_ERROR)