Old Perl Code
Uh, oh. Just found some old Perl code of mine. It's from 1998-05-31:
Well, in my defense: It's Perl. ;-)
OK, this can't excuse it. But don't be afraid: The program isn't used anymore.
[...]
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: Perl
1 Comments:
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.
Post a Comment
<< Home