Branch Coverage

lib/Log/Shiras/Switchboard.pm
Criterion Covered Total %
branch 76 106 71.7


line true false branch
109 10 5 if $instance->_has_import_recursion_block
111 0 5 if @args and 0
114 0 5 if ($args[0] and $args[0] =~ /^v?\d+\.?\d*/)
118 0 0 if ($result < 0)
124 0 5 if (@args)
130 1 4 if ($Log::Shiras::Unhide::strip_match)
142 0 13 if ($maybe_class ne 'Log::Shiras::Switchboard')
147 0 0 is_YamlFile($args[0]) || is_JsonFile($args[0]) ? :
7 0 @args > 1 && scalar(@args) % 2 == 0 ? :
6 7 !@args ? :
157 0 7 if ($arguments and exists $arguments->{'conf_file'})
168 7 6 if (keys %$arguments)
181 14 0 is_HashRef($arguments->{$key}) ? :
188 12 2 if ($instance->can($method_1)) { }
219 45 3272 if ($recursion == 0) { }
444 2828 elsif ($recursion == 1) { }
232 79 410 if ($self->_can_communicate($data_ref->{'report'}, $data_ref->{'level'}, $data_ref->{'name_space'})) { }
263 75 4 $y eq 'report' ? :
311 7 2 scalar @args == 1 ? :
325 5 2 if (is_ReportObject($report)) { }
357 1 1 if ($self->has_log_levels($report)) { }
383 6 0 if ($self->has_buffer($report)) { }
412 1 0 if ($self->has_buffer($report)) { }
436 0 2 if ($self->has_buffer($report)) { }
518 430 59 if ($self->_has_can_com_cash($cash_string)) { }
525 12 47 unless keys %$source_space
540 135 26 if (exists $source_space->{$next_level}) { }
564 32 27 if ($key =~ /$report/i)
576 17 15 if ($attempted >= $allowed) { }
596 65 14 unless (exists $data_ref->{'source_sub'})
610 79 6 if ($caller_ref->{'subroutine'} eq $data_ref->{'source_sub'})
617 0 85 if $level > 6
639 1 78 if ($data_ref->{'carp_stack'})
660 4 75 if ($self->has_buffer($report_ref->{'report'}))
681 9 69 unless ($self->_has_test_buffer($report_ref->{'report'}))
712 78 0 if ($Log::Shiras::Test2::last_buffer_position)
722 56 22 if ($report_array_ref) { }
724 0 44 unless $report
750 2 54 if ($data_ref->{'level'} =~ /fatal/i)
757 1 1 if (not $data_ref->{'message'}) { }
762 1 0 if (not $element or length $element == 0) { }
0 0 elsif ($i) { }
764 0 0 ref $element ? :
767 0 0 ref $element ? :
771 0 1 length $fatality > 0 ? :
784 48 134 if (exists $space_ref->{'UNBLOCK'})
795 0 182 if (exists $space_ref->{'BLOCK'})
818 25 39 if (is_ElevenInt($level)) { }
824 0 39 $self->has_log_levels($report) ? :
0 39 !$report ? :
827 0 39 if (not $level_ref) { }
839 39 137 if ($word and $level =~ /^$word$/i)
848 0 39 unless ($found)