Branch Coverage

blib/lib/Data/Validate/VIN.pm
Criterion Covered Total %
branch 44 56 78.5


line true false branch
22 3 9 unless (scalar @{$self->{'errors'};} > 0)
30 11 1 scalar(@{$self->{'errors'};} > 0) ? :
41 1 2 defined $self->{'valid'} ? :
50 11 1 scalar(@{$self->{'errors'};} > 0) ? :
56 24 0 if ($wanted =~ /wmi|vds|vis|vin|checkdigit|country|year/i)
57 8 16 if ($wanted =~ /vin|checkdigit/i) { }
12 4 elsif ($wanted =~ /wmi|vds|vis/i) { }
0 4 elsif ($wanted =~ /country/i) { }
4 0 elsif ($wanted =~ /year/i) { }
59 5 3 defined $self->{$wanted} ? :
64 3 9 defined $self->{$wanted}{$wanted} ? :
69 0 0 defined $self->{'wmi'}{$wanted} ? :
74 1 3 defined $self->{'vis'}{$wanted} ? :
87 2 10 if (not defined $_vin or $_vin =~ /^$/)
101 6 4 if (length $_vin != 17)
126 2 1 defined $$_allowed{$wmi->{'wmi'}} ? :
141 8 147 unless ($checked[$i] =~ /^$args{'wanted'}+$/)
146 5 14 if (@illegal)
256 3 0 length $_vin == 17 ? :
273 3 0 length $_vin == 17 ? :
280 3 0 if (defined $vis->{'vis'})
319 2 1 defined $years{$yearDigit} ? :
322 2 1 if ($year) { }
327 1 0 unless $vis->{'year'}
337 0 3 unless length $_vin == 17
404 0 3 if $calcCheckDigit == '10'
407 1 2 $calcCheckDigit =~ /$passedCheckDigit/ ? :
445 0 1752 $order{$current} == $max ? :