Branch Coverage

lib/Test/NoBreakpoints.pm
Criterion Covered Total %
branch 24 34 70.5


line true false branch
82 0 21 unless (open $fh, $file)
92 11 10 if (not $matched) { }
100 10 11 $matched ? :
110 2 0 @_ ? :
115 8 40 if (-d $file)
117 0 8 unless opendir DH, $file
122 46 0 if $_ ne 'CVS'
126 40 8 if (-f $file)
127 26 14 if _is_perl($file)
137 0 0 if -e 'blib'
144 0 40 if $file =~ /\.PL$/
145 4 36 if $file =~ /\.p(l|m)$/
146 22 14 if $file =~ /\.t$/
149 0 14 unless open FH, $file
153 0 14 if defined $first and $first =~ /^#!.*perl/
162 1 0 @_ ? :
166 4 9 unless &no_breakpoints_ok($_)