Branch Coverage

blib/lib/Logfile/Base.pm
Criterion Covered Total %
branch 14 86 16.2


line true false branch
27 8 0 unless ref $f eq 'GLOB' or ref \$f eq 'GLOB'
38 8 0 if (ref $par{'Group'}) { }
43 8 0 if ($file) { }
44 0 8 if (isafh($file)) { }
48 0 8 if ($file =~ /\.gz$/) { }
49 0 0 unless open S, "gzip -cd $file|"
52 0 8 unless open S, "$file"
62 0 0 if $$self{'File'}
71 0 0 if (ref $group) { }
82 0 0 if (ref $group) { }
98 0 0 unless $rec
103 0 0 if (defined $$self{$gname}{$key}) { }
121 0 0 $rever ? :
125 0 0 unless $$self{$group}
127 0 0 if ($list) { }
128 0 0 if (ref $list) { }
142 0 0 if ($key =~ /$;/) { }
145 0 0 if length $key[$_] > $mklen[$_]
151 0 0 if length $key > $mklen
154 0 0 if defined $$val{$_}
158 0 0 $_ > $Logfile::MAXWIDTH ? :
159 0 0 if ($group =~ /$;/) { }
179 0 0 if ($key =~ /$;/) { }
188 0 0 defined $$val{$list} ? :
189 0 0 if ($absolute{$list} > 0) { }
197 0 0 if defined $par{'Top'} and --$par{'Top'} <= 0
205 0 0 if ($rev) { }
211 0 0 if ($x =~ /[^\d.]|^$/o or $y =~ /[^\d.]|^$/o) { }
236 0 8 if $HaveGetDate = $@ eq ''
237 8 0 unless ($HaveGetDate)
239 0 8 if $HaveDateGetDate = $@ eq ''
240 8 0 unless ($HaveDateGetDate)
265 8 0 if ($par{'Date'})
267 0 8 if ($HaveGetDate) { }
0 8 elsif ($HaveDateGetDate) { }
0 8 elsif ($HaveParseDate) { }
288 0 0 if ($par{'Host'})
290 0 0 if ($host =~ /[^\d.]/) { }
291 0 0 if ($host =~ /\./) { }
311 0 0 if $_ eq $ignore
312 0 0 unless defined $$other{$_}
313 0 0 unless length $$other{$_}
314 0 0 if $$other{$_} =~ /\D/