2009-02-09

Old Perl Code

Uh, oh. Just found some old Perl code of mine. It's from 1998-05-31:

[...]
return undef unless defined($findit);

return 1;
}


Well, in my defense: It's Perl. ;-)

OK, this can't excuse it. But don't be afraid: The program isn't used anymore.

Labels:

1 Comments:

Anonymous Mr Z said...

Old PERL code is a wonderful teacher. I've recently had to look at code I wrote only 6 years ago and thought to myself "who wrote this?" and then thought "What the hell was I thinking when I wrote that?"
Then again, looking at the contortions I went through to achieve something small inspired a couple of changes that I've since pushed out to scripts totaling > 50k lines. One moment of embarrassed wince and I've improved a lot of my current code.

February 9, 2009 6:17 PM  

Post a Comment

<< Home