| line |
!l |
l&&!r |
l&&r |
condition |
|
37
|
57 |
0 |
1 |
$$conf_hr{'cpanel_mode'} and $$conf_hr{'cpanel_mode'} != 0 |
|
58
|
56 |
0 |
9 |
defined $$regexp[2] && ref $$regexp[2] eq 'HASH' |
|
62
|
0 |
65 |
513 |
defined $text_working_copy and $text_working_copy =~ /$token_rx/ |
|
87
|
3 |
1 |
2 |
$pre =~ /\#/ and not $pre =~ /[\n\r]$/ |
|
100
|
495 |
3 |
4 |
$text_working_copy =~ /^\s*\{/ and not $matched =~ /\(\s*$/ |
|
158
|
115 |
213 |
137 |
defined $opener and $opener eq q['] |
|
|
115 |
213 |
0 |
defined $type and $type eq 'q' || $type eq 'qw' |
|
159
|
115 |
277 |
73 |
defined $opener and $opener eq '"' |
|
|
115 |
253 |
24 |
defined $type and $type eq 'qq' |
|
165
|
115 |
328 |
22 |
defined $type and $type eq '<<' |
|
178
|
115 |
42 |
308 |
defined $inside and exists $$result_hr{'quotetype'} |
|
|
157 |
278 |
30 |
defined $inside and exists $$result_hr{'quotetype'} and $inside eq '' |
|
|
115 |
0 |
320 |
defined $inside and $inside |
|
|
115 |
0 |
0 |
defined $opener and defined $inside |
|
|
115 |
0 |
0 |
defined $opener and defined $inside and defined $closer |
|
|
0 |
0 |
0 |
defined $opener and defined $inside and defined $closer and defined $phrase |
|
|
0 |
0 |
0 |
defined $opener and defined $inside and defined $closer and defined $phrase and $phrase eq "$opener$inside$closer" |
|
309
|
390 |
0 |
34 |
$var and defined $for |
|
|
390 |
0 |
34 |
$var and defined $for and defined $aft |
|
|
0 |
0 |
34 |
$var and defined $for and defined $aft and $for =~ /\A\s*\z/ |
|
|
0 |
0 |
34 |
$var and defined $for and defined $aft and $for =~ /\A\s*\z/ and $aft =~ /\A\s*\z/ |
|
340
|
274 |
98 |
18 |
exists $$result_hr{'type'} and $$result_hr{'type'} eq 'perlish' |
|
371
|
6 |
6 |
0 |
$in_multi_line and $updated_result_count == $initial_result_count |
|
|
6 |
0 |
6 |
$in_multi_line and $updated_result_count > $initial_result_count |
|
|
6 |
2 |
4 |
$in_multi_line and $updated_result_count > $initial_result_count and $results[-1]{'type'} |
|
|
2 |
0 |
6 |
not $in_multi_line and @results |
|
|
2 |
4 |
2 |
not $in_multi_line and @results and defined $results[-1]{'type'} |
|
|
4 |
0 |
2 |
not $in_multi_line and @results and defined $results[-1]{'type'} and $results[-1]{'type'} eq 'multiline' |