Branch Coverage

blib/lib/Ham/Locator.pm
Criterion Covered Total %
branch 8 18 44.4


line true false branch
172 0 5 if ($self->get_latlng eq '')
212 4 1 if ($self->get_precision) { }
233 0 1 if ($self->get_loc eq '')
240 1 0 if (length $loc lt 4) { }
0 0 elsif (length $loc lt 6) { }
0 0 elsif (length $loc lt 8) { }
0 0 elsif (length $loc lt 10) { }
257 0 1 unless ($loc =~ /[a-rA-R]{2}[0-9]{2}[a-xA-X]{2}[0-9]{2}[a-xA-X]{2}/)
271 6 4 if ($a =~ /[a-zA-Z]/) { }