Branch Coverage

blib/lib/Devel/TraceUse.pm
Criterion Covered Total %
branch 13 74 17.5


line true false branch
6 0 3 if (not defined &DB::DB and $^P & 2)
17 1 64 if $INC[0] ne \&trace_use
53 0 0 if (/^hidecore(?::(.*))?/) { }
0 0 elsif (/^output:(.*)$/) { }
54 0 0 $1 ? :
56 0 0 unless open $output_fh, '>', $1
83 18 0 if $module =~ s/\.pm$//
105 2 16 if ($caller->{'filename'} =~ /^(\(eval \d+\))(?:\[(.*):(\d+)\])?$/)
119 14 4 if $caller->{'filepackage'} =~ s/\.pm$//
125 18 0 if ($caller->{'filename'})
129 16 5 if $subroutine =~ /::/
144 0 0 unless $TRACE{'ranked'}
148 0 0 if (exists $INC{$filename})
155 0 0 if (exists $TRACE{'used'}{$filename})
187 0 0 defined $mod->{'version'} ? :
189 0 0 if defined $caller->{'filename'}
191 0 0 if defined $caller->{'line'}
193 0 0 if $mod->{'eval'}
195 0 0 if $caller->{'package'} ne $caller->{'filepackage'}
197 0 0 unless exists $mod->{'filepath'}
208 0 0 if (ref $mod) { }
209 0 0 if ($hide_core)
212 0 0 unless $hide
220 0 0 $hide ? :
232 0 0 unless @hot_loaders
239 0 0 length $subroutine ? :
247 3 0 if $quiet
252 0 0 unless $^P
255 0 0 if ($hide_core)
262 0 0 unless exists $Module::CoreList::version{$hide_core}
267 0 0 defined $output_fh ? :
274 0 0 if (%{$TRACE{'loaded_by'};})
280 0 0 if (my(@missed) = sort(grep({$_ ne 'Devel/TraceUse.pm' if not exists $reported{$_};} keys %INC)))
281 0 0 if not exists $reported{$_}
285 0 0 if @missed
291 0 0 if defined $output_fh
299 0 2 if $^C