| blib/lib/Time/ZoneInfo.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 22 | 63.6 |
| line | true | false | branch |
|---|---|---|---|
| 12 | 0 | 1 | unless $this->init(@params) |
| 25 | 0 | 1 | unless (defined $fh) |
| 32 | 36 | 416 | if $line =~ /^\s*#/ |
| 33 | 0 | 416 | if $line =~ /^\s*$/ |
| 35 | 416 | 0 | if ($line =~ /^[^#](\S+)\s*\t\s*(\S+)\s*\t\s*(\S+)\s*(\t|$)/) |
| 37 | 416 | 0 | if ($zone =~ m[^(.+?)/(.+)$]) |
| 50 | 1 | 0 | wantarray ? : |
| 55 | 1 | 10 | unless defined $region |
| 59 | 416 | 3744 | if ($zone =~ m[^$region/]) |
| 63 | 10 | 0 | wantarray ? : |
| 68 | 11 | 0 | wantarray ? : |