Branch Coverage

lib/load.pm
Criterion Covered Total %
branch 32 122 26.2


line true false branch
21 0 1 unless (eval { do { require warnings } })
27 0 1 if (defined $ifdef::VERSION) { }
28 0 0 if $ifdef::VERSION < 0.07
39 0 1 if ($ENV{'LOAD_TRACE'}) { }
58 1396 1 ref $_[0] ? :
1397 7436 unless &{$can;}(@_)
92 1 0 if (@_) { }
0 0 elsif ($module eq 'main') { }
102 0 1 if ($_ eq 'now') { }
1 0 elsif ($_ eq 'ondemand') { }
0 0 elsif (/^(?:autoload|AUTOLOAD)$/) { }
0 0 elsif ($_ eq 'dontscan') { }
0 0 elsif ($_ eq 'inherit') { }
0 0 elsif ($_ eq 'AutoLoader') { }
103 0 0 $inmain ? :
108 1 0 $inmain ? :
114 0 0 if $inmain
120 0 0 $inmain ? :
125 0 0 if $inmain
131 0 0 unless $inmain
135 0 0 if (not $INC{'AutoLoader.pm'} or $INC{'AutoLoader.pm'} ne $INC{'load.pm'})
152 0 1 if (not $inmain)
153 0 0 if $scan
155 0 0 if $autoload
161 0 0 if $lineno
170 0 0 if ($class eq 'load')
183 0 0 if _can($1, $2)
186 0 0 if $2 eq 'DESTROY'
207 0 1 defined $_[0] ? :
214 0 1 unless my $file = _filename($module)
216 0 1 unless open VERSION, "<$file"
218 0 1 unless binmode VERSION
233 167 2091 if /^=\w/
234 2003 88 if $pod or /^\s*#/
237 0 88 if /^__END__/
240 87 1 unless /^package\s+([\w:]+)\s*;/
243 0 1 if $package
248 0 1 unless $package
249 0 1 if $package ne $module
256 0 1 if ($loadnow) { }
268 0 0 if $@
285 0 0 if /^=\w/
286 0 0 if $pod or /^\s*#/
289 0 0 if /^__END__/
292 0 0 if /^package\s+([\w:]+)\s*;/
296 0 0 unless /^sub\s+([\w:]+)/
300 0 0 if $sub
304 0 0 if $sub =~ /::/
312 0 0 defined $_ ? :
0 1 if $sub
340 1 0 unless ref $filename
363 0 0 if $@
382 0 1 if $module eq 'main'
385 1 0 unless exists $AUTOLOAD{$module}
390 1 0 unless $start
394 0 0 unless my $file = _filename($module)
396 0 0 unless open VERSION, "<$file"
398 0 0 unless binmode VERSION
400 0 0 unless seek VERSION, $start, 0
414 0 0 if $read != $length
426 0 0 if $@