line |
true |
false |
branch |
139
|
20 |
2 |
if (not $impl and eval {
do {
require Ref::Util;
1
}
}) { } |
281
|
4 |
20 |
if (2 == @_ and XXX and &all(sub {
XXX;
}
, @{$_[1];})) |
319
|
4 |
132 |
if (0 == @rows) |
323
|
28 |
104 |
if (1 == @rows) |
325
|
4 |
24 |
if (defined $blessing and $blessing eq $class) |
330
|
4 |
20 |
if (XXX and &all(sub {
XXX;
}
, @{$rows[0];})) |
337
|
4 |
120 |
if (&any(sub {
not XXX;
}
, @rows)) |
552
|
0 |
0 |
unless $xlsx_filespec |
560
|
0 |
0 |
unless (defined $workbook) |
566
|
0 |
0 |
unless (defined $sheet) |
582
|
0 |
0 |
if (defined $_) { } |
654
|
0 |
0 |
unless $filetype |
659
|
0 |
0 |
if ($filetype eq 'xlsx') |
663
|
0 |
0 |
if ($filetype eq 'tsv') |
747
|
1 |
1 |
unless &blessed($self) |
784
|
4 |
20 |
unless (@{$self;}) |
785
|
2 |
2 |
if defined wantarray |
798
|
10 |
10 |
if (defined wantarray) |
860
|
20 |
314 |
unless @{$self;} |
886
|
4 |
198 |
unless @{$self;} |
911
|
6 |
26 |
unless -@$self <= $row_idx and $row_idx <= $#{$self;} |
915
|
6 |
20 |
unless -@{$self->[$row_idx];} <= $col_idx and $col_idx <= $#{$$self[$row_idx];} |
931
|
6 |
30 |
unless -@$self <= $row_idx and $row_idx <= $#{$self;} |
950
|
20 |
84 |
unless -$width <= $col_idx and $col_idx < $width |
954
|
6 |
78 |
if $col_idx < 0 |
960
|
342 |
64 |
0 <= $col_idx && $col_idx <= $#{$_;} ? : |
983
|
196 |
14 |
-@$self <= $_ && $_ <= $#{$self;} ? : |
1047
|
8 |
174 |
if $col_idx < 0 |
1056
|
706 |
100 |
if (-$width <= $col_idx and $col_idx < $width) { } |
1098
|
144 |
24 |
unless $row_idx < 0 |
1107
|
144 |
24 |
unless $col < 0 |
1113
|
20 |
64 |
if $lastrow < $firstrow |
1116
|
16 |
68 |
if $lastcol < $firstcol |
1121
|
8 |
60 |
if ($lastrow < 0 or $self_lastrow < $firstrow or $lastcol < 0 or $self_lastcol < $firstcol) |
1126
|
12 |
12 |
if defined wantarray |
1133
|
8 |
52 |
if $self_lastrow < $lastrow |
1134
|
0 |
60 |
if $firstrow < 0 |
1139
|
0 |
60 |
if $firstcol < 0 |
1141
|
12 |
48 |
if $rows_lastcol < $lastcol |
1144
|
30 |
30 |
if defined wantarray |
1186
|
0 |
20 |
unless @elements |
1207
|
0 |
26 |
unless @elements |
1209
|
2 |
24 |
if ($col_idx < -$width) |
1212
|
8 |
16 |
if $col_idx < 0 |
1323
|
6 |
14 |
if ($#{$self;} < $row_idx) { } |
1346
|
0 |
30 |
unless @col |
1348
|
2 |
28 |
if ($col_idx < -$width) |
1351
|
2 |
26 |
if $col_idx < 0 |
1359
|
24 |
60 |
if ($#{$$self[$row_idx];} < $col_idx) { } |
1369
|
28 |
0 |
if defined wantarray |
1411
|
0 |
0 |
if defined wantarray |
1495
|
0 |
10 |
unless @col |
1534
|
0 |
0 |
if (-1 == $col_idx) |
1536
|
0 |
0 |
if defined wantarray |
1545
|
0 |
0 |
unless (defined $row_r) |
1552
|
0 |
0 |
if defined wantarray |
1574
|
2 |
20 |
unless @{$self;} |
1575
|
2 |
18 |
if $class->last_row($self) < $row_idx |
1577
|
16 |
2 |
if (defined wantarray) |
1603
|
4 |
28 |
if $width <= $col_idx |
1605
|
2 |
26 |
if ($col_idx < -$width) |
1608
|
2 |
24 |
if $col_idx < 0 |
1611
|
26 |
0 |
if (defined wantarray) |
1621
|
26 |
0 |
if defined wantarray |
1636
|
0 |
0 |
unless (@$self) |
1637
|
0 |
0 |
if defined wantarray |
1642
|
0 |
0 |
if (defined wantarray) |
1651
|
0 |
0 |
if defined wantarray |
1666
|
0 |
0 |
unless (@$self) |
1667
|
0 |
0 |
if defined wantarray |
1672
|
0 |
0 |
if (defined wantarray) |
1681
|
0 |
0 |
if defined wantarray |
1694
|
2 |
10 |
unless @{$self;} |
1725
|
2 |
10 |
unless @{$self;} |
1741
|
2 |
10 |
unless @{$self;} |
1743
|
0 |
10 |
if -1 == $last_col |
1806
|
24 |
4 |
unless not defined $_ |
1819
|
28 |
4 |
unless not defined $_ |
1851
|
8 |
316 |
if (defined wantarray) { } |
1870
|
36 |
288 |
unless @{$self;} |
1877
|
856 |
308 |
unless &$callback() |
1897
|
4 |
4 |
if (defined wantarray) { } |
1905
|
4 |
4 |
if (not defined $padding) { } |
1953
|
98 |
32 |
if (defined wantarray) { } |
1982
|
20 |
64 |
unless defined $_ |
2004
|
20 |
64 |
unless defined $_ |
2057
|
0 |
0 |
if ($col) { } |
2103
|
0 |
0 |
if (@_) { } |
2105
|
0 |
0 |
0 == $keycol ? : |
2304
|
34 |
36 |
if (@headers) |
2305
|
0 |
34 |
if (1 == @headers and XXX) { } |
2319
|
12 |
700 |
if ($substitutions and not $carped) |
2332
|
32 |
38 |
wantarray ? : |
2351
|
6 |
112 |
if ($substitutions and not $carped) |
2412
|
0 |
0 |
unless $type |
2415
|
0 |
0 |
if ($type eq 'xlsx') |
2419
|
0 |
0 |
if ($type eq 'tsv') |
2422
|
0 |
0 |
if ($params{'headers'}) |
2478
|
0 |
0 |
if ($params{'headers'}) |
2486
|
0 |
0 |
unless defined $workbook |
2492
|
0 |
0 |
if (defined $format_properties) |
2499
|
0 |
0 |
&blessed($self) ? : |
2503
|
0 |
0 |
if (@headers) { } |