<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 TRANSITIONAL//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; CHARSET=UTF-8">
<META NAME="GENERATOR" CONTENT="GtkHTML/3.28.3">
</HEAD>
<BODY>
I've just confirmed with $client that the topic is kosher. Note that I learned the information I will be presenting while working on a "web service" that allows users to manipulate their zone data, as well as a jQuery front end that calls it via AJAX and exercises it in more ways than I care to recall.<BR>
<BR>
I think you can get an account and try it out free of charge, so long as you can convince Liquid Web you have a pulse and a web browser:<BR>
<BR>
<A HREF="https://www.stormondemand.com/manage/login.html">https://www.stormondemand.com/manage/login.html</A><BR>
<BR>
I've never made slides before. I may just plug the monitor in to my vga out and let you watch me abuse <A HREF="http://search.cpan.org/~olaf/Net-DNS-0.66/lib/Net/DNS/RR.pm">Net::DNS::RR</A>::* and <A HREF="http://search.cpan.org/~olaf/Net-DNS-Zone-Parser-0.02/Parser.pm">Net::DNS::Zone::Parser</A> via emacs. I've had to perform some pretty abusive tricks in order to retain default TTL values which result in spew during test runs that look not unlike this:<BR>
<BR>
<PRE>
Use of uninitialized value in join or string at /usr/lib64/perl5/site_perl/5.8.8/x86_64-linux-thread-multi/Net/DNS/RR.pm line 660.
</PRE>
<BR>
I've also had to do things like the following in order to avoid FQDN resolution/expansion shenanigans.<BR>
<BR>
<PRE>
$rr->{name} =~ s/^\Q$origin\E\.?$/@/
</PRE>
<BR>
I've further discovered that, unlike all of the other field accessors in all of the the other Net:DNS::RR::* classes, the <A HREF="http://search.cpan.org/~olaf/Net-DNS-0.66/lib/Net/DNS/RR/TXT.pm">Net::DNS::RR::TXT</A> package provides a read-only $rr->txtdata(), and any modification to the txtdata field in the Net::DNS::RR object can only be done by defiling its $self hash ref thus.<BR>
<BR>
<PRE>
$rr->{txtdata} = $newVal;
delete $rr->{char_str_list};
</PRE>
<BR>
Again, this will be a talk on how *not* to implement a zone file editor. And there will be LOLCATS.<BR>
<BR>
Kisses,<BR>
<BR>
C.J.<BR>
<BR>
On Tue, 2010-05-04 at 21:13 -0700, Colin Meyer wrote:
<BLOCKQUOTE TYPE=CITE>
<PRE>
DNS zone editor in Perl? Awesome! Let's do it.
-Colin.
p.s. top posting is teh awesome ... :D
On Mon, May 03, 2010 at 06:32:15PM -0700, C.J. Adams-Collier wrote:
> I could do something on how not to implement a DNS zone editor.
>
> On Mon, 2010-05-03 at 17:11 -0700, Andrew Sweger wrote:
> > I dunno. I got nothing. I heard a rumor that Ingy is in Taiwan. I've
> > scared off Noah Rømer.
> >
> > Does anyone have anything Perlish they'd like to share in two weeks on May
> > 18th at the SPUG meeting? It doesn't have to be just one anyone or two
> > hours long. It can be shorter.
> >
> > --
> > Andrew B. Sweger -- The great thing about multitasking is that several
> > things can go wrong at once.
> >
> >
> > _____________________________________________________________
> > Seattle Perl Users Group Mailing List
> > POST TO: <A HREF="mailto:spug-list@pm.org">spug-list@pm.org</A>
> > SUBSCRIPTION: <A HREF="http://mail.pm.org/mailman/listinfo/spug-list">http://mail.pm.org/mailman/listinfo/spug-list</A>
> > MEETINGS: 3rd Tuesdays
> > WEB PAGE: <A HREF="http://seattleperl.org/">http://seattleperl.org/</A>
>
> _____________________________________________________________
> Seattle Perl Users Group Mailing List
> POST TO: <A HREF="mailto:spug-list@pm.org">spug-list@pm.org</A>
> SUBSCRIPTION: <A HREF="http://mail.pm.org/mailman/listinfo/spug-list">http://mail.pm.org/mailman/listinfo/spug-list</A>
> MEETINGS: 3rd Tuesdays
> WEB PAGE: <A HREF="http://seattleperl.org/">http://seattleperl.org/</A>
</PRE>
</BLOCKQUOTE>
<BR>
</BODY>
</HTML>