| line |
true |
false |
branch |
|
31
|
0 |
5 |
if $@
|
|
56
|
0 |
43 |
if (/:btwN=(.*)/)
|
|
60
|
7 |
36 |
if (/:btw=(.*)/) { }
|
|
101
|
12 |
2 |
defined $r ? :
|
|
|
11 |
3 |
@_ && ref $_[0] eq 'HASH' ? :
|
|
116
|
7 |
4 |
ref $_[0] eq 'ARRAY' ? :
|
|
117
|
0 |
11 |
if wantarray
|
|
118
|
1 |
10 |
if (my $is_sequential = @items >= 4)
|
|
121
|
1 |
0 |
unless defined $_ and /^\w+$/ and ($seq //= $items[0])++ eq $_
|
|
124
|
0 |
1 |
if ($is_sequential)
|
|
134
|
5 |
16 |
$_ > 0 && (ref $items[$_ - 1] ne 'SCALAR' || ${$items[$_ - 1];} eq '') && (ref $item ne 'SCALAR' || ${$item;} eq '') ? :
|
|
|
5 |
16 |
ref $item eq 'SCALAR' ? :
|
|
174
|
0 |
66 |
unless defined $frame[0]
|
|
176
|
0 |
66 |
unless my($called_pkg) = $frame[3] =~ /^(.*)::/
|
|
179
|
14 |
52 |
if ($called_pkg ne "Spreadsheet::Edit::Log" and &$callback($state, \@frame))
|