Skip Menu |

This queue is for tickets about the DNS-ZoneParse CPAN distribution.

Report information
The Basics
Id: 26448
Status: open
Priority: 0/
Queue: DNS-ZoneParse
People
Owner: SIMONFLK [...] cpan.org
Requestors: dreamg [...] cpan.org
Cc:
AdminCc:
Bug Information
Severity: Important
Broken in: 0.95
Fixed in: 0.95

History Show all quoted text
  Tue Apr 17 10:19:40 2007 dreamg [...] cpan.org - Ticket created
Subject: [Patch] Parse TXT records without quotes
--- ZoneParse.pm 2004-10-24 18:55:01.000000000 +0200 +++ /usr/local/share/perl/5.8.8/DNS/ZoneParse.pm 2007-04-17 16:12:57.000000000 +0200 @@ -269,7 +269,7 @@ $self -> _massage({ name => $1, class => $3, ttl => $2, host => $4 }); } - elsif (/($valid_name)? \s $ttl_cls TXT \s \"([^\"]*)\"/ix) + elsif (/($valid_name)? \s $ttl_cls TXT \s \"?([^\"]*)\"?/ix) { push @{$dns_txt{$self}}, $self -> _massage({ name => $1, ttl => $2, class => $3,
  Tue Apr 17 10:21:29 2007 dreamg [...] cpan.org - Status changed from 'new' to 'open'
  Tue Apr 17 10:24:48 2007 dreamg [...] cpan.org - Correspondence added
RT-Send-CC: SIMONFLK
Sorry, wrong path ... --- /usr/local/share/perl/5.8.8/DNS/ZoneParse.pm 2004-10-24 18:55:01.000000000 +0200 +++ /usr/local/share/perl/5.8.8/DNS/ZoneParse.pm 2007-04-17 16:12:57.000000000 +0200 @@ -269,7 +269,7 @@ $self -> _massage({ name => $1, class => $3, ttl => $2, host => $4 }); } - elsif (/($valid_name)? \s $ttl_cls TXT \s \"([^\"]*)\"/ix) + elsif (/($valid_name)? \s $ttl_cls TXT \s \"?([^\"]*)\"?/ix) { push @{$dns_txt{$self}}, $self -> _massage({ name => $1, ttl => $2, class => $3,
  Tue Apr 17 10:25:00 2007 dreamg [...] cpan.org - Given to SIMONFLK