| Subject: | Time-ZoneInfo doesn't find all zones in zone.tab |
Distrubution: Time-ZoneInfo-0.1
Perl: v5.6.0 built for i386-linux
OS: Linux 2.2.19-6.2.1ensim-3.1.3-5
ZoneInfo only finds zones that include comments (4th column).
However, the comments column is not present for all zones so
many zones are not being included.
In the "init" subroutine, changing the line:
if ($line =~ /^[^#](\S+)\s*\t+\s*(\S+)\s*\t\s*(\S+)\s*\t+\s*.*$/) {
to
if ($line =~ /^[^#](\S+)\s*\t\s*(\S+)\s*\t\s*(\S+)\s*(\t|$)/) {
appears to correct the problem.