Condition Coverage

blib/lib/Image/ExifTool/Geolocation.pm
Criterion Covered Total %
condition 68 143 47.5


and 2 conditions

line l !l condition
313 1 0 do { $country } && do { $countryList[$cn] = "$cc$country" }
490 0 1 defined $featureCodes{$_} and delete $fcOK{$featureCodes{$_}}
492 0 0 defined $featureCodes{$_} and $fcOK{$featureCodes{$_}} = 1
566 0 0 $cty =~ /$_/ and next Entry
575 2 54 $_ and $geoLkup{lc $_} = 1
581 0 0 $geo[$idx] =~ /$_/ and next Entry
587 0 0 $str =~ /$_/ and next Entry

and 3 conditions

line !l l&&!r l&&r condition
148 0 0 1 defined $comment and $comment =~ / (\d+) /
159 114249 628 1 length $line == 6 and $line =~ /\0\0\0\0/
168 238 0 1 length $line == 6 and $line =~ /\0\0\0\0/
176 3478 276 1 length $line == 6 and $line =~ /\0\0\0\0/
184 30931 982 1 length $line == 6 and $line =~ /\0\0\0\0/
192 379 0 1 length $line == 6 and $line =~ /\0\0\0\0/
202 18 1 1 length $line == 6 and $line =~ /\0\0\0\0/
222 0 0 0 $Image::ExifTool::Geolocation::altDir and $nCity
381 9 0 0 $sort and @sortOrder > $entryNum
400 0 9 0 $lang and $lang ne "en"
414 0 0 0 $userLang and ref $userLang eq "HASH"
450 0 0 0 $sort and @sortOrder > $entryNum
518 0 0 0 $3 and uc $3 eq "S"
519 0 0 0 $6 and uc $6 eq "W"
539 2 5 1 @coords == 2 and $both || !defined($city)
543 5 1 2 defined $city and @coords != 2 || $both
546 2 1 0 $lastArgs and $lastArgs eq $cargs
554 1 2 0 $city and $Image::ExifTool::Geolocation::altDir
561 114878 14 229741 $city and $city ne lc $cty
562 229740 0 1 $altNames->[$i] and $altNames->[$i] =~ /^$city$/im
590 1628 0 0 $fcodes and not $fcOK{ord substr($cityList[$i], 12, 1) & 63}
602 2 0 0 $num > 1 and scalar keys %lastFound == 1
665 3006 116 38252 defined $minPop and $minPop ge substr($cityList[$i], 6, 2)
666 2477 617 28 $fcodes and not $fcOK{ord substr($cityList[$i], 12, 1) & 63}

or 2 conditions

line l !l condition
396 9 0 $featureCodes[$fn & 63] || 'Other'
423 0 0 $xlat || 0
544 0 3 $pop || ''
0 3 $maxDist || ''
0 3 $fcodes || ''
565 0 0 $cty =~ /$_/ or next Entry
576 1 13 $geoLkup{$_} or next Entry
580 1626 113252 $geo[$idx] =~ /$_/m or next Entry
586 0 0 $str =~ /$_/ or next Entry

or 3 conditions

line l !l&&r !l&&!r condition
295 0 0 1 $dbVer eq "1.02" or @featureCodes > 63
0 1 0 $dbVer eq "1.02" or @featureCodes > 63 or not length $fc
432 0 0 0 $$xlat{"$cc$r2,$sub,$city"} || $$xlat{"$cc$r2,$city"} || $$xlat{"$cc,$city"} || $$xlat{",$city"} || $xlat->{$city} || $city
433 0 0 0 $$xlat{"$cc$rgn,$sub,"} || $xlat->{$sub} || $sub
434 0 0 0 $$xlat{"$cc$rgn,"} || $xlat->{$rgn} || $rgn
435 0 0 0 $$xlat{"$cc,"} || $xlat->{$country} || $country
534 3 5 0 defined $city or @coords == 2
539 5 1 0 $both || !defined($city)
543 2 1 0 @coords != 2 || $both
584 0 0 1628 $regex{'9'} or $regex{'19'}
592 1628 0 0 not defined $minPop or $pc ge $minPop
635 1 5 0 @lastByLat || @cityList
655 6 0 6 $inc == 1 or $n0 == $n1