blib/lib/Spreadsheet/Edit/Log.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 15 | 31 | 48.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
101 | 2 | 1 | 11 | @_ && ref $_[0] eq 'HASH' |
121 | 0 | 1 | 0 | defined $_ and /^\w+$/ |
1 | 0 | 0 | defined $_ and /^\w+$/ and ($seq //= $items[0])++ eq $_ | |
134 | 3 | 2 | 5 | $_ > 0 && (ref $items[$_ - 1] ne 'SCALAR' || ${$items[$_ - 1];} eq '') && (ref $item ne 'SCALAR' || ${$item;} eq '') |
165 | 0 | 0 | 4 | defined &Carp::CALLER_OVERRIDE_CHECK_OK && &Carp::CALLER_OVERRIDE_CHECK_OK |
179 | 39 | 13 | 14 | $called_pkg ne "Spreadsheet::Edit::Log" and &$callback($state, \@frame) |
line | l | !l | condition |
---|---|---|---|
38 | 11 | 0 | eval { |
39 | 11 | 0 | eval { |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
96 | 14 | 0 | 0 | caller $N // &oops() |
121 | 0 | 0 | 0 | $seq //= $items[0] |
262 | 0 | 0 | 0 | shift() // croak("Missing 'self' argument\n") |