Branch Coverage

blib/lib/CGI/Compile.pm
Criterion Covered Total %
branch 34 44 77.2


line true false branch
33 1 3217 $orig ? :
35 3218 0 $proto ? :
40 3200 1 defined $exit_code ? :
45 3202 3234 if $USE_REAL_EXIT
54 0 3218 if $@
62 13 3286 ref $class ? :
66 88 3211 if (ref $script eq 'SCALAR') { }
85 37 3262 $code =~ /^#!.*\s-w\b/ ? :
88 3208 91 defined $1 ? :
91 3211 88 $path ? :
3211 88 $dir ? :
3211 88 $path ? :
144 6 3293 if $exception
150 0 0 unless $_[0] =~ /^No such signal/
161 0 3211 unless open my $fh, "<", $file
172 28899 0 if defined $_
180 3211 0 $package ? :
194 3214 85 unless (-d $tmp_dir)
195 0 3214 unless mkdir $tmp_dir
196 0 3214 unless chmod 0700, $tmp_dir
207 0 3299 unless unlink $fname
213 3214 4 if ($tmp_dir and -d $tmp_dir)