| blib/lib/Time/Duration/Abbreviated.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 16 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 52 | 2 | 3 | unless my $span = shift() |
| 57 | 2 | 4 | unless my $span = shift() |
| 88 | 14 | 16 | $span >= 1 ? : |
| 12 | 30 | $span <= -1 ? : | |
| 109 | 133 | 112 | if $$piece[1] == 0 |
| 113 | 85 | 27 | if ($unit =~ /\A(?:hr|day|yr)\Z/) |
| 114 | 38 | 47 | if $val > 1 |
| 120 | 16 | 33 | unless @wheel |