| blib/lib/DelayLine.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 24 | 62.5 |
| line | true | false | branch |
|---|---|---|---|
| 35 | 5 | 11 | if ($arg =~ /^-?$attrib$/i) |
| 42 | 2 | 8 | if (my(@unknown) = keys %args) |
| 45 | 1 | 1 | @unknown == 1 ? : |
| 48 | 0 | 8 | if $$self{'DEBUG'} |
| 60 | 0 | 2 | if @_ |
| 69 | 0 | 5 | unless defined $delay |
| 78 | 0 | 5 | if $$self{'DEBUG'} |
| 95 | 0 | 9 | unless (@{$$self{'_LINE'};}) |
| 96 | 0 | 0 | if $$self{'DEBUG'} |
| 102 | 5 | 4 | if ($$self{'_LINE'}[0]{'OUTTIME'} <= $now) |
| 104 | 0 | 5 | if $$self{'DEBUG'} |
| 110 | 0 | 4 | if $$self{'DEBUG'} |