| Subject: | not catching 1D,1W etc as ttl |
Distribution: DNS-ZoneParse 0.8
DNS/ZoneParse.pm: 1.5 2001-05-21 13:00:51+01 simon
ZoneParse does not parse '1D' , '1W' etc as valiad TTL.
The patch attach should fix that.
To reproduce try on.
localhost 1D IN A 127.0.0.1
--- ZoneParse.pm Fri Jul 12 17:53:09 2002
+++ ZoneParse.pm.atif Fri Jul 12 17:52:48 2002
@@ -172,7 +172,7 @@
my $valid_name = qr/[\@a-z\-\.0-9\*]+/i;
my $rr_class = qr/in|hs|ch/i;
my $rr_types = qr/ns|a|cname/i;
- my $rr_ttl = qr/\d+/;
+ my $rr_ttl = qr/\d{1,}\w{0,1}/;
foreach my $RR (@{$self->{RRs}}) {