blib/lib/Time/Mock.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 24 | 62.5 |
line | true | false | branch |
---|---|---|---|
87 | 1 | 4 | if @_ % 2 |
90 | 1 | 2 | unless $class->can($k) |
166 | 3 | 5 | unless @_ |
169 | 0 | 5 | unless $v |
176 | 1 | 1 | unless @_ |
185 | 0 | 0 | unless my $set = shift @_ |
186 | 0 | 0 | unless ($set =~ /^\d+$/) |
204 | 1 | 1 | unless defined $time |
211 | 0 | 0 | unless defined $time |
217 | 0 | 2 | unless $length |
223 | 0 | 2 | unless defined $length |
224 | 1 | 1 | unless $length |