http://qs321.pair.com?node_id=294758

What was the worst Perl code you ever wrote? You know, that code that was one of your first Perl projects and you just had to put online somewhere. You hadn't learned about strict back then and did not know why symbolic references are evil. Or even that they are called symbolic references.

It is using lots of globals, maybe even shared throughout multiple modules. Because you didn't realise the importance of style, not everything is indented correctly and the style is inconsistent at best. No external database is used, everything is serialized and stored as strings. If there was a database at all, then it used a table per record because you didn't bother to learn about databases.

If there was any documentation at all, it would not be enough for future maintenance. But there probably was no documentation at all. Comments were absent, just like error checking and sanity checks. The Perl 5 code could probably be run in Perl 4 without too many modifications.

Many Perl Monks have made bad stuff like what I described above. Of course, this is a somewhat dramatic view, but I'd like to ask you to be honest.

What code did you create years ago that you are ashamed of now? Why is it that bad, what would you do differently now?

Juerd # { site => 'juerd.nl', plp_site => 'plp.juerd.nl', do_not_use => 'spamtrap' }

P.S. I will of course post my own Worst Perl Project too, but before that I need to deal with the worst security issues :)