Branch Coverage

blib/lib/Test/Apocalypse.pm
Criterion Covered Total %
branch 18 48 37.5


line true false branch
29 0 73 if (not $ENV{'RELEASE_TESTING'} || $ENV{'AUTOMATED_TESTING'}) { }
39 73 0 if (@_ & 1 and ref $_[0] and ref $_[0] eq 'HASH') { }
43 0 0 if (@_ & 1)
54 0 73 if (exists $opt{'allow'} and exists $opt{'deny'})
58 146 0 if (not exists $opt{$type} && defined $opt{$type}) { }
60 0 146 if exists $opt{$type}
62 0 0 if (not ref $opt{$type}) { }
0 0 elsif (ref $opt{$type} ne 'Regexp') { }
65 0 0 if ($@)
88 1511 0 unless (exists $ENV{'PERL_APOCALYPSE'} and $ENV{'PERL_APOCALYPSE'})
89 0 1511 if (exists $opt{'allow'}) { }
0 1511 elsif (exists $opt{'deny'}) { }
90 0 0 if ($t =~ /^Test::Apocalypse::(.+)$/)
91 0 0 unless ($1 =~ /$opt{'allow'}/)
97 0 0 if ($t =~ /^Test::Apocalypse::(.+)$/)
98 0 0 if ($1 =~ /$opt{'deny'}/)
108 184 1327 if ($@)
112 0 184 if ($ENV{'RELEASE_TESTING'} or $ENV{'PERL_APOCALYPSE'}) { }
122 258 1069 if ($t->can('_is_disabled') and not $ENV{'PERL_APOCALYPSE'})
124 111 147 if ($ret)
131 185 1031 if ($ENV{'AUTOMATED_TESTING'} and not $ENV{'PERL_APOCALYPSE'} and $t->can('_do_automated') and not $t->_do_automated)
146 0 959 if ($@)
150 0 0 if ($err->isa('Test::Builder::Exception'))
155 0 0 if ($ENV{'RELEASE_TESTING'} or $ENV{'PERL_APOCALYPSE'}) { }