Branch Coverage

blib/lib/UniLog.pm
Criterion Covered Total %
branch 26 70 37.1


line true false branch
236 0 1 if ($_[0] eq 'nosyslog') { }
1 0 elsif ($_[0] eq 'syslog') { }
241 0 0 if ($^W)
246 1 0 if ($InitSyslog and not $OpenLog)
291 0 1 if ($SyslogEnabled and not $OpenLog)
308 5 5 unless (defined $LogParam{$_})
312 0 1 unless (defined $LogFacilities{$LogParam{'Facility'}})
332 1 0 if ($OpenLog)
335 0 1 unless ($$self{'Handler'})
342 1 0 if (defined $$self{'LogFileNameTemplate'})
345 0 1 unless (defined $$self{'LogFileNameTemplate'})
377 0 4 if ($Level < 0) { }
0 4 elsif ($Level > $#LogLevels) { }
379 0 0 if ($^W)
384 0 0 if ($^W)
388 4 0 if ($Level <= $$self{'Level'})
390 4 0 $$self{'SafeStr'} ? :
392 4 0 if ($$self{'StdErr'})
395 4 0 if ($PutMsg)
398 4 0 if (defined $$self{'LogFileNameTemplate'})
400 0 4 unless (&{$FileReOpen;}($self))
405 0 4 unless (print {$$self{'LogFileHandler'};} (localtime()) . " $Level $Str\n")
418 0 0 if (defined $_[1])
426 0 1 if (defined $_[1])
434 0 0 if (defined $_[1])
441 0 1 if (defined $_[1])
443 0 1 if (defined $_[2])
451 0 0 if (defined $_[1])
453 0 0 if (defined $_[2])
455 0 0 wantarray ? :
461 0 0 if (defined $_[1])
468 0 0 if ($_[0]{'LogFileHandler'})
475 1 0 if ($CloseLog)
479 1 0 if (defined $_[0]{'LogFileHandler'})
486 0 5 unless my $Str = shift()