| blib/lib/Switch/Again.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 11 | 100.0 |
| line | l | !l | condition |
|---|---|---|---|
| 35 | 1 | 23 | eval { do { @result = $Switch::Again::STRUCT{$_->{'ref'}}($_->{'case'}, $val); @result = () if @result and $result[0] eq ""; @result } } and do { @result = ref $_->{'cb'} eq "CODE" ? $_->{'cb'}->($val, @result) : $_->{'cb'} } and last |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 31 | 32 | 25 | 12 | @result and $result[0] eq "" |
| 35 | 44 | 2 | 23 | eval { do { @result = $Switch::Again::STRUCT{$_->{'ref'}}($_->{'case'}, $val); @result = () if @result and $result[0] eq ""; @result } } and do { @result = ref $_->{'cb'} eq "CODE" ? $_->{'cb'}->($val, @result) : $_->{'cb'} } |
| 36 | 3 | 1 | 7 | $default && &$default($val) |