Branch Coverage

blib/lib/prefork.pm
Criterion Covered Total %
branch 23 26 88.4


line true false branch
212 1 3 unless $_[1]
213 1 2 $_[1] eq ':enable' ? :
233 6 1 defined $_[0] ? :
2 5 unless my $module = defined $_[0] ? "$_[0]" : ''
235 1 4 unless $module =~ /^[^\W\d]\w*(?:(?:\'|::)[^\W\d]\w*)*$/
240 0 4 if $INC{$file}
241 0 4 if $MODULES{$module}
244 2 2 if $FORKING
269 1 3 if $FORKING
277 0 2 if $INC{$file}
326 3 7 unless ($reftype and $reftype eq 'CODE')
331 2 5 if ($FORKING)
337 1 4 if (&List::Util::first(sub { &Scalar::Util::refaddr($function) == &Scalar::Util::refaddr($_); } , @NOTIFY))