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)) |