| blib/lib/App/HWD/Work.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 18 | 77.7 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 0 | 18 | unless @cols >= 4 |
| 39 | 13 | 5 | if (defined $comment) { } |
| 40 | 10 | 3 | if ($comment =~ s/\s*X\s*//i) |
| 49 | 1 | 17 | if ($hours =~ s/h$//) { } |
| 1 | 16 | elsif ($hours =~ /^(\d+)m$/) { } | |
| 0 | 16 | elsif ($hours != $hours + 0) { } | |
| 59 | 1 | 17 | unless $task =~ /^\d+$/ or $task eq '^' |
| 100 | 0 | 0 | if exists $$self{$key} |
| 143 | 2 | 19 | unless my $obj = $$self{'when'} |