Branch Coverage

blib/lib/Test/Clustericious/Log.pm
Criterion Covered Total %
branch 49 64 76.5


line true false branch
36 3 7 if (wantarray) { }
1 6 elsif (defined wantarray) { }
51 3 7 wantarray ? :
63 125 37 if (ref $pattern eq 'Regexp') { }
65 116 9 unless $event->{$key} =~ /$pattern/
69 18 19 unless $event->{$key} eq $pattern
82 8 4 unless ref $pattern eq 'HASH'
89 11 44 if (_event_match($pattern, $event))
98 1 11 unless ($ok)
120 7 2 unless ref $pattern eq 'HASH'
127 3 89 if (_event_match($pattern, $event))
158 9 34 if ($counter++)
161 0 9 unless ($caller eq 'Test::Clustericious::Cluster')
171 12 22 unless -d "$home/etc"
172 34 0 unless -d "$home/log"
182 0 34 if (@_ == 1) { }
193 6 96 if (defined $args->{$type})
196 2 4 if ($args->{$type} =~ /^(TRACE|DEBUG|INFO|WARN|ERROR|FATAL)(..(TRACE|DEBUG|INFO|WARN|ERROR|FATAL)|)$/) { }
3 1 elsif ($args->{$type} eq 'NONE') { }
1 0 elsif ($args->{$type} eq 'ALL') { }
199 1 1 unless $max
220 34 0 if defined $config->{'FileX'}
221 34 0 if defined $config->{'NoteX'}
222 31 3 if defined $config->{'DiagX'}
223 34 0 if defined $config->{'TestX'}
261 2 32 if ($args->{'import'})
263 0 2 ref $args->{'import'} ? :
277 0 0 if ($hub->failed)
279 0 0 if ($ENV{'CLUSTERICIOUS_LOG_SPEW_OFF'}) { }
0 0 elsif (-r "$home/log/test.log") { }
307 0 87 unless $class eq 'Test::Clustericious::Log::Appender'
312 22 65 unless (defined $self)