<html><head><meta http-equiv="Content-Type" content="text/html charset=us-ascii"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div>Dick,</div><div><br></div><div>I'm not using eval (or wasn't until I saw your code sample), and this script in particular is not threaded.</div><div><br></div><div>My workstation is Mac OS X 10.8. The client was using Windows and ActivePerl (latest).</div><div><br></div><div>Regards,</div><div>Chris Buxton</div><br><div><div>On May 31, 2013, at 3:02 PM, Dick Franks <<a href="mailto:rwfranks@acm.org">rwfranks@acm.org</a>> wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite">Please can you let us know platform and perl revision info.<br><br>Others have reported issues with eval{...} and threads<br><br clear="all"><div><div dir="ltr">Dick Franks<br><br>--<br></div></div>
<br><br><div class="gmail_quote">On 31 May 2013 22:15, Chris Buxton <span dir="ltr"><<a href="mailto:clists@buxtonfamily.us" target="_blank">clists@buxtonfamily.us</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div style="word-wrap:break-word"><div>The problem occurred with Net::DNS 0.72. I was not using Net::DNS::ZoneFile to read the zone from disk.</div><div><br></div><div>After reading these comments, I tried the script locally, on my development workstation, and it worked fine. On the client's workstation, it failed, despite having the same version of Net::DNS. I have no explanation.</div>
<div><br></div><div>Thanks for the guidance.</div><span class="HOEnZb"><font color="#888888">Chris Buxton</font></span><div><div class="h5"><br><div><div>On May 22, 2013, at 2:30 PM, Dick Franks <<a href="mailto:rwfranks@acm.org" target="_blank">rwfranks@acm.org</a>> wrote:</div>
<br><blockquote type="cite">Chris,<br><br>Revision of Net::DNS?<br><br>I do not understand why a zone transfer would fail in the way you describe.<br><br>Are you using Net::DNS::ZoneFile to read your zone data from disk?<br>
<br>There should be no need to hack RR.pm.<br>
Your script needs to handle the exception condition.<br><br> my $zone = new Net::DNS::ZoneFile( $filename );<br> <br> loop { # through RRs in zone file<br><br> my $rr = eval { $zone->read; }; # which knows about multi-line RRs<br>
if ( $@ ) {<br> warn $@;<br> next;<br> }<br><br> last unless $rr;<br><br> # process RR<br><br> }<br><br><br>Regards<br><br clear="all"><div><div dir="ltr">Dick Franks<br>
<br>--<br></div></div>
<br><br><div class="gmail_quote">On 22 May 2013 20:30, Chris Buxton <span dir="ltr"><<a href="mailto:clists@buxtonfamily.us" target="_blank">clists@buxtonfamily.us</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
I have a script that reads zones from files on disk and also via zone transfer. Currently, when reading in data, if the script encounters a record for which Net::DNS does not implement a record type class, the script dies. The immediate case looks like this:<br>
<br>
WKS not implemented at /usr/lib/perl5/site_perl/5.14/i686-cygwin-threads-64int/Net/DNS/RR.pm line 630.<br>
new Net:NS::RR( ... ) at ./<a href="http://dnsdiff.pl/" target="_blank">dnsdiff.pl</a> line 300<br>
<br>
Short of hacking Net::DNS::RR, how can I handle this without dying and without losing any records coming after the unknown record type in a zone transfer?<br>
<br>
Regards,<br>
Chris Buxton<br>
_______________________________________________<br>
net-dns-users mailing list<br>
<a href="mailto:net-dns-users@nlnetlabs.nl" target="_blank">net-dns-users@nlnetlabs.nl</a><br>
<a href="https://www.nlnetlabs.nl/mailman/listinfo/net-dns-users" target="_blank">https://www.nlnetlabs.nl/mailman/listinfo/net-dns-users</a><br>
</blockquote></div><br>
_______________________________________________<br>net-dns-users mailing list<br><a href="mailto:net-dns-users@nlnetlabs.nl" target="_blank">net-dns-users@nlnetlabs.nl</a><br><a href="https://www.nlnetlabs.nl/mailman/listinfo/net-dns-users" target="_blank">https://www.nlnetlabs.nl/mailman/listinfo/net-dns-users</a></blockquote>
</div><br></div></div></div><br>_______________________________________________<br>
net-dns-users mailing list<br>
<a href="mailto:net-dns-users@nlnetlabs.nl">net-dns-users@nlnetlabs.nl</a><br>
<a href="https://www.nlnetlabs.nl/mailman/listinfo/net-dns-users" target="_blank">https://www.nlnetlabs.nl/mailman/listinfo/net-dns-users</a><br></blockquote></div><br>
_______________________________________________<br>net-dns-users mailing list<br><a href="mailto:net-dns-users@nlnetlabs.nl">net-dns-users@nlnetlabs.nl</a><br>https://www.nlnetlabs.nl/mailman/listinfo/net-dns-users</blockquote></div><br></body></html>