Branch Coverage

lib/Weather/GHCN/App/CacheUtil.pm
Criterion Covered Total %
branch 23 68 33.8


line true false branch
126 0 0 if ($Opt->clean)
128 0 0 if (@errors)
136 0 0 if $Opt->outclip and $USE_WINCLIP
142 0 0 if (keys %$files_href == 0)
147 0 0 if ($Opt->remove)
150 0 0 unless $file->{'INCLUDE'}
164 0 0 if $Opt->outclip and $USE_WINCLIP
186 0 6 unless match_type($file->{'Type'}, $Opt->type)
188 0 6 if $Opt->country and $file->{'Country'} ne $Opt->country
189 0 6 if $Opt->state and $file->{'State'} ne $Opt->state
193 0 6 if (defined $Opt->size)
194 0 0 $Opt->size <= 0 ? :
0 0 unless $Opt->size <= 0 ? $kb <= -$Opt->size : $kb >= $Opt->size
199 0 6 if (defined $Opt->age)
202 0 0 $Opt->age <= 0 ? :
0 0 unless $Opt->age <= 0 ? $file->{'Age'} <= -$Opt->age : $file->{'Age'} >= $Opt->age
205 0 6 if ($Opt->invert) { }
206 0 0 if $Opt->location and $file->{'Location'} =~ /$loc/imsu
208 0 6 if $Opt->location and not $file->{'Location'} =~ /$loc/imsu
233 0 1 if @errors
277 0 1 unless &GetOptionsFromArray($argv_aref, \%opt, @options)
294 0 1 if $Opt->usage
295 0 1 if $Opt->help
308 0 1 unless $profile_href
310 0 1 unless $aliases_href
335 0 1 unless @files
341 2 4 if ($bname =~ / [.]txt \Z/msux)
350 0 1 if (@txtfiles == 0)
372 0 4 $alias_href->{$fileid} ? :
410 7 7 unless $match_types
414 5 5 if uc $m eq uc $file_type
453 0 0 if ($old_fh) { }
457 0 0 unless open my $new_fh, ">", \$output
490 0 6 unless $file->{'INCLUDE'}