| line |
!l |
l&&!r |
l&&r |
condition |
|
139
|
2 |
0 |
20 |
not $impl and eval {
do {
require Ref::Util;
1
}
} |
|
281
|
102 |
2 |
22 |
2 == @_ and XXX |
|
|
104 |
18 |
4 |
2 == @_ and XXX and &all(sub {
XXX;
}
, @{$_[1];}) |
|
325
|
24 |
0 |
4 |
defined $blessing and $blessing eq $class |
|
330
|
0 |
20 |
4 |
XXX and &all(sub {
XXX;
}
, @{$rows[0];}) |
|
911
|
2 |
4 |
26 |
-@$self <= $row_idx and $row_idx <= $#{$self;} |
|
915
|
2 |
4 |
20 |
-@{$self->[$row_idx];} <= $col_idx and $col_idx <= $#{$$self[$row_idx];} |
|
931
|
2 |
4 |
30 |
-@$self <= $row_idx and $row_idx <= $#{$self;} |
|
934
|
0 |
30 |
0 |
@row and not defined $row[-1] |
|
950
|
6 |
14 |
84 |
-$width <= $col_idx and $col_idx < $width |
|
960
|
0 |
64 |
342 |
0 <= $col_idx && $col_idx <= $#{$_;} |
|
963
|
0 |
84 |
70 |
@col and not defined $col[-1] |
|
983
|
4 |
10 |
196 |
-@$self <= $_ && $_ <= $#{$self;} |
|
1056
|
40 |
60 |
706 |
-$width <= $col_idx and $col_idx < $width |
|
1581
|
0 |
16 |
0 |
@deleted and not defined $deleted[-1] |
|
1613
|
0 |
26 |
0 |
@deleted and not defined $deleted[-1] |
|
1696
|
0 |
10 |
0 |
@row and not defined $row[-1] |
|
1711
|
2 |
10 |
2 |
@col and not defined $col[-1] |
|
1727
|
0 |
10 |
0 |
@row and not defined $row[-1] |
|
1859
|
36 |
354 |
64 |
@{$self;} and !defined($self->[-1]) || 0 == @{$self->[-1];} || &all(sub {
&$callback();
}
, @{$$self[-1];}) |
|
2305
|
34 |
0 |
0 |
1 == @headers and XXX |
|
2319
|
696 |
4 |
12 |
$substitutions and not $carped |
|
2351
|
112 |
0 |
6 |
$substitutions and not $carped |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
137
|
0 |
2 |
20 |
$ENV{'PERL_ARRAY_2D_NO_REF_UTIL'} || our $NO_REF_UTIL |
|
652
|
0 |
0 |
0 |
shift() || &$filetype_from_ext_r($filespec) |
|
1121
|
8 |
8 |
68 |
$lastrow < 0 or $self_lastrow < $firstrow |
|
|
16 |
4 |
64 |
$lastrow < 0 or $self_lastrow < $firstrow or $lastcol < 0 |
|
|
12 |
4 |
60 |
$lastrow < 0 or $self_lastrow < $firstrow or $lastcol < 0 or $self_lastcol < $firstcol |
|
1859
|
66 |
64 |
288 |
!defined($self->[-1]) || 0 == @{$self->[-1];} || &all(sub {
&$callback();
}
, @{$$self[-1];}) |
|
2105
|
0 |
0 |
0 |
shift() // (0 == $keycol ? 1 : 0) |
|
2410
|
0 |
0 |
0 |
$params{'type'} || &$filetype_from_ext_r($output_file) |