| blib/lib/Time/TZ.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 20 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 4 | 0 | unless (delete $self{'defer'}) |
| 47 | 2 | 6 | if ($choose) |
| 49 | 2 | 1 | if ($self->tz_known($_)) |
| 55 | 0 | 0 | defined $name ? : |
| 58 | 0 | 0 | if (defined(my $tz = delete $$self{'fallback'})) |
| 72 | 3 | 11 | if (not defined $tz or $tz_known{$tz}) |
| 77 | 5 | 6 | if ($tz =~ /^[A-Z]+[0-9+-]+([A-Z]+)?($|,)/) |
| 90 | 3 | 3 | if (-e $filename) |
| 107 | 0 | 36 | if ($l_hour != $g_hour or $l_min != $g_min) |
| 119 | 0 | 0 | unless (defined $timet) |