| blib/lib/IPC/MorseSignals/Emitter.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 12 | 18 | 66.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 40 | 0 | 1 | 99 | ref $_[0] and $_[0]->isa('IPC::MorseSignals::Emitter') |
| 80 | 0 | 0 | 42 | $_ > 0 && !$count{$_}++ |
| 101 | 9 | 0 | 1 | $delay and $delay += 0 |
| 114 | 5 | 0 | 41 | $speed and $speed = int $speed |
| line | l | !l | condition |
|---|---|---|---|
| 54 | 14 | 0 | ref $class || $class || (return) |
| 60 | 5 | 5 | delete $opts{'speed'} || 0 |
| 65 | 6 | 8 | $delay || 1 |