Branch Coverage

blib/lib/Log/TraceMessages.pm
Criterion Covered Total %
branch 23 32 71.8


line true false branch
101 1 7 unless $Log::TraceMessages::On
103 2 5 if (defined $Log::TraceMessages::Logfile) { }
104 2 0 unless (defined $curr_Logfile and $curr_Logfile eq $Log::TraceMessages::Logfile)
105 2 0 if (defined $fh)
106 0 2 unless $fh eq \*STDOUT or $fh eq \*STDERR
111 2 0 unless (defined $fh)
112 0 2 unless $fh = 'FileHandle'->new(">>$Log::TraceMessages::Logfile")
125 4 1 if (defined $fh)
126 2 2 unless $fh eq \*STDOUT or $fh eq \*STDERR
128 2 3 $Log::TraceMessages::CGI ? :
131 0 7 unless defined $fh
135 3 4 if ($Log::TraceMessages::CGI) { }
137 0 3 unless print $fh "\n
", HTML::FromText::text2html($s), "
\n"
141 0 4 unless print $fh "$s\n"
171 1 2 unless $Log::TraceMessages::On
206 1 0 if ($_ eq '--trace') { }