Branch Coverage

blib/lib/Bio/NEXUS/Util/Logger.pm
Criterion Covered Total %
branch 14 34 41.1


line true false branch
34 34 681 unless ($self)
40 1 714 if (@_)
44 0 1 if ($@)
50 1 714 if (defined $args{'-level'})
53 0 1 if ($args{'-level'} > $LEVEL{'DEBUG'} xor $args{'-level'} < $LEVEL{'FATAL'}) { }
57 0 1 if ($args{'-class'}) { }
73 0 0 if (UNIVERSAL::isa($arg, 'CODE')) { }
87 0 2626 exists $VERBOSE{$pack0up} ? :
88 11 2615 if ($verbosity >= $LEVEL{$level})
90 11 0 if ($filename =~ s/\Q$Bio::NEXUS::Util::Logger::class_dir\E//) { }
108 2626 0 if (exists $LEVEL{$method})
115 0 0 if $prefix
121 0 0 if (@_)
124 0 0 if ($@)
127 0 0 if (defined $opt{'-level'})
130 0 0 if ($opt{'-level'} > $LEVEL{'DEBUG'} xor $opt{'-level'} < $LEVEL{'FATAL'})
134 0 0 if ($opt{'-class'}) { }