Branch Coverage

lib/SeeAlso/Identifier/ISIL.pm
Criterion Covered Total %
branch 7 18 38.8


line true false branch
21 3 0 if (defined $value) { }
26 0 3 unless length $value <= 16
29 0 3 unless $value =~ /^([A-Z0-9]+)-(.+)$/
34 0 3 unless $prefix =~ /^[A-Z]{2}$/ or $prefix =~ /^[A-Z0-9]([A-Z0-9]{1-3})?$/
38 0 3 unless $local =~ m[^[a-zA-Z0-9:/-]+$]
50 0 1 ${$_[0];} eq '' ? :
55 0 1 ${$_[0];} eq '' ? :
60 0 0 ${$_[0];} =~ /^([A-Z0-9]+)-(.+)$/ ? :
65 0 0 ${$_[0];} =~ /^([A-Z0-9]+)-(.+)$/ ? :