Branch Coverage

blib/lib/CTK/Log.pm
Criterion Covered Total %
branch 35 62 56.4


line true false branch
360 0 3 $^O =~ /mswin/i ? :
406 0 2 unless defined $level
412 1 1 unless defined $file and length $file
413 1 1 if $file and not "File::Spec"->file_name_is_absolute($file)
433 1 1 if ($usesyslog) { }
436 0 1 if ($socketopts and ref $socketopts eq 'ARRAY') { }
0 1 elsif ($socketopts and !ref($socketopts) || ref $socketopts eq 'HASH') { }
450 0 1 if length $self->{'error'}
459 0 1 if length $self->{'error'}
460 0 1 unless (defined $fh)
464 1 0 if $self->{'utf8'}
478 5 0 $self->{'status'} ? :
485 0 2 unless $self->status
488 0 2 unless (defined $level)
492 1 1 if $level < $self->{'level'}
495 0 1 if ($self->{'usesyslog'}) { }
526 0 1 unless defined $level
530 1 0 unless ($self->{'pure'})
538 1 0 if defined $ident and length $ident
542 1 0 if (defined $fh) { }
544 1 0 if @buffer
550 0 1 if length $self->{'error'}
563 0 0 unless defined $level
570 0 0 if length $self->{'error'}
577 0 4 unless defined $ll
581 3 1 if ($ll =~ /^[0-9]+$/ and exists $rlevels{$ll}) { }
1 0 elsif ($ll =~ /^[a-z]+$/i and exists $levels{lc $ll}) { }
582 3 0 if $ll >= 0 and $ll <= 9
596 0 2 unless $self and $self->status
597 1 1 if ($self->{'usesyslog'}) { }
600 1 0 if defined $self->{'fh'} and ref $self->{'fh'}