| line |
true |
false |
branch |
|
45
|
0 |
0 |
if (-x "$_/CIPP/Compile/cipp_perlcheck.pl") |
|
52
|
0 |
0 |
unless -x $perlcheck_program |
|
57
|
0 |
0 |
unless my $pid = open2($fh_read, $fh_write, "$perl $perlcheck_program") |
|
60
|
0 |
0 |
$^O =~ /win/i ? : |
|
84
|
0 |
0 |
unless $code_sref |
|
86
|
0 |
0 |
$output_file ? : |
|
123
|
0 |
0 |
if $line eq $delimiter |
|
129
|
0 |
0 |
unless $parse_result |
|
156
|
0 |
0 |
if eof $fh |
|
162
|
0 |
0 |
if ($@ =~ /timeout/) |
|
185
|
0 |
0 |
if $error =~ /BEGIN not safe/ |
|
187
|
0 |
0 |
unless $line |
|
198
|
0 |
0 |
if ($code[$i] =~ /^#\s+cipp_line_nr=(\d+)\s+(\w+)/) |
|
212
|
0 |
0 |
unless ($code_line_found) |
|
225
|
0 |
0 |
if (not $found_error and $$error_sref ne '') |
|
259
|
0 |
0 |
unless -f '/tmp/do.the.cipp3debug' |