Branch Coverage

blib/lib/Ham/WSJTX/Logparse.pm
Criterion Covered Total %
branch 0 22 0.0


line true false branch
196 0 0 scalar @files == 0 ? :
202 0 0 unless -f $file
209 0 0 if ($^O eq 'darwin') { }
0 0 elsif ($^O =~ /^MSWin/ or $^O eq 'cygwin') { }
213 0 0 if -f $homeAll
214 0 0 if -f $globalAll
233 0 0 unless (open F, "<$file")
245 0 0 if (/^(\d{4}-\S{3}-\d{2}) \d{2}:\d{2}\s+(\d+\.\d+) MHz\s+\S+\s*$/)
259 0 0 if (/^(\d{4})\s+(-\d+)\s+[-\d.]+\s+(\d+)\s([#@])\s\w+\s+(\w+)\s+([A-Z]{2}\d{2})\s*$/)
267 0 0 unless $ccallsign =~ /\d/
268 0 0 if (defined $currentDate and $bandOfInterest eq $currentBand)