| line |
!l |
l&&!r |
l&&r |
condition |
|
115
|
98 |
1 |
13 |
$paren and not $has_qw |
|
117
|
98 |
1 |
13 |
$paren and not $has_qw |
|
187
|
105 |
24 |
0 |
@$values > $indent_lim and length $tmp > $Data::Pretty::LINEWIDTH || $tmp =~ /\n/ |
|
194
|
0 |
0 |
0 |
scalar @buf and length $Data::Pretty::INDENT . join(" ", @buf, $v) > $Data::Pretty::LINEWIDTH |
|
229
|
32 |
3 |
6 |
$ref and @i |
|
|
35 |
4 |
2 |
$ref and @i and $i[0] eq "\$" |
|
233
|
13 |
28 |
5 |
@i and $i[0] eq "\$" |
|
300
|
0 |
8 |
2 |
length $_ < 16384 and /^(.{2,5}?)\1*\z/s |
|
310
|
301 |
1 |
7 |
length $_ > 40 and not /\\x\{/ |
|
|
302 |
4 |
3 |
length $_ > 40 and not /\\x\{/ and length $_ > length($_[0]) * 2 |
|
316
|
1 |
0 |
2 |
$Data::Pretty::TRY_BASE64 and length $_[0] > $Data::Pretty::TRY_BASE64 |
|
|
0 |
1 |
1 |
defined &utf8::is_utf8 and not utf8::is_utf8($_[0]) |
|
|
1 |
1 |
1 |
$Data::Pretty::TRY_BASE64 and length $_[0] > $Data::Pretty::TRY_BASE64 and (defined &utf8::is_utf8 and not utf8::is_utf8($_[0])) |
|
|
1 |
0 |
1 |
$Data::Pretty::TRY_BASE64 and length $_[0] > $Data::Pretty::TRY_BASE64 and (defined &utf8::is_utf8 and not utf8::is_utf8($_[0])) and eval {
do {
require MIME::Base64
}
} |
|
366
|
1400 |
0 |
0 |
$] < "5.008" and $type eq "SCALAR" |
|
413
|
9 |
0 |
2 |
defined $out and not @bless |
|
424
|
2 |
8 |
9 |
$ref && $type eq 'SCALAR' |
|
430
|
0 |
3 |
1 |
@$idx and $idx->[-1] eq "\$" |
|
448
|
19 |
4 |
9 |
$class and $class eq "Regexp" |
|
503
|
1211 |
2 |
1 |
$class and not @$idx |
|
536
|
7 |
5 |
29 |
$k eq "SCALAR" and not defined $$gval |
|
642
|
860 |
21 |
26 |
defined $this_type and $this_type eq "HASH" |
|
662
|
53 |
854 |
0 |
$nl and $klen_pad > length $key |
|
670
|
1 |
0 |
1 |
$Data::Pretty::CODE_DEPARSE and eval {
do {
require B::Deparse
}
} |
|
696
|
1363 |
4 |
14 |
$class and $ref |
|
717
|
0 |
362 |
7 |
not ref $v and $v =~ /[\,\#[:blank:]\h\v]/ |