Branch Coverage

blib/lib/Geo/METAR/Deduced.pm
Criterion Covered Total %
branch 38 38 100.0


line true false branch
209 1 2 defined $self->{'WIND_VAR'} ? :
216 2 1 defined $self->{'WIND_VAR_1'} ? :
225 2 1 defined $self->{'WIND_VAR_2'} ? :
239 1 1 if ($gust) { }
279 3 17 if (defined $Geo::METAR::Deduced::LAST_PAREN_MATCH{'vv'})
306 22 26 if ($layer =~ /(?:BKN|OVC)(?<base>\d{3})/gimsux)
309 20 2 if ($cloud_base < $cloud_ceiling and $TEST{$self->rules}($cloud_base))
316 20 14 if ('US' eq $self->rules)
318 3 17 if ($vv < $cloud_ceiling)
322 11 23 $INF == $cloud_ceiling ? :
333 26 11 if ($Geo::METAR::Deduced::LAST_PAREN_MATCH{'unit'})
338 4 33 if ($Geo::METAR::Deduced::LAST_PAREN_MATCH{'whole'})
341 8 29 if ($amount =~ m[(?<num>[[:digit:]]+)[/](?<den>[[:digit:]]+)]msux) { }
355 5 10 if ($self->visibility->mile < $vis_min{'IFR'}->mile or $self->ceiling->ft < $ceil_min{'IFR'}->ft) { }
2 8 elsif ($self->visibility->mile < $vis_min{'MVFR'}->mile or $self->ceiling->ft < $ceil_min{'MVFR'}->ft) { }
5 3 elsif ($self->visibility->mile <= $vis_min{'VFR'}->mile or $self->ceiling->ft <= $ceil_min{'VFR'}->ft) { }
399 6 1 if ($w =~ /$RE/u)
401 5 1 if ($Geo::METAR::Deduced::LAST_PAREN_MATCH{'modifier'})
402 3 2 $Geo::METAR::Deduced::LAST_PAREN_MATCH{'modifier'} eq $MINUS ? :