Branch Coverage

blib/lib/Array/2D.pm
Criterion Covered Total %
branch 131 206 63.5


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) { }