| line |
!l |
l&&!r |
l&&r |
condition |
|
17
|
15 |
0 |
0 |
$] < "5.006" and not defined &warnings::import |
|
128
|
0 |
22 |
3 |
$abs_script ne "" and not "File::Spec"->file_name_is_absolute($abs_script) |
|
145
|
231 |
1 |
252 |
$token =~ m[\A[A-Z0-9_\-\\/\.:\@%]+\z] and $token =~ /[A-Z]/ |
|
226
|
0 |
16 |
138 |
$i < $n and substr($line, $i, 1) ne "'" |
|
231
|
0 |
39 |
252 |
$i < $n and substr($line, $i, 1) ne "\"" |
|
239
|
0 |
1 |
10 |
$i < $n and substr($line, $i, 1) ne "`" |
|
242
|
1218 |
0 |
29 |
$c eq "\$" and $i + 1 < $n |
|
|
1218 |
23 |
6 |
$c eq "\$" and $i + 1 < $n and substr($line, $i + 1, 1) eq "(" |
|
245
|
4 |
2 |
145 |
$i < $n and $d > 0 |
|
325
|
450 |
99 |
25 |
$cur ne "" and $s =~ /\A(?:RET|RETURN)\s*\z/i |
|
|
450 |
99 |
0 |
$cur ne "" and $s =~ /\A:([A-Za-z_][A-Za-z0-9_]*)\s*\z/ |
|
649
|
0 |
0 |
0 |
not defined $hd_delim and $depth == 0 |
|
657
|
0 |
0 |
0 |
$depth == 0 and $line =~ /\A\s*\z/ |
|
660
|
0 |
0 |
0 |
$depth == 0 and $cur_mode eq "" |
|
668
|
0 |
0 |
0 |
$depth == 0 and not defined $pending_hd_delim |