Beefy Boxes and Bandwidth Generously Provided by pair Networks
Come for the quick hacks, stay for the epiphanies.
 
PerlMonks  

Re: Worst thing you ever made with Perl

by atcroft (Abbot)
on Sep 28, 2003 at 17:00 UTC ( [id://294769]=note: print w/replies, xml ) Need Help??


in reply to Worst thing you ever made with Perl

Forgive me mine, for it scares me some nights to think it may survive still.

The one that scares me the most thinking about it was a script I wrote about 4-5 years ago (well before I knew of the Monastery). At the time, a gentleman who did web design asked if I could write a replacement for CGI he used to send submitted web form input to a site's owner via email. (The CGI he had previously used was a compiled binary, and would not work on the new platform he was moving to.) The list of scary features (that I can recall) included:

  • No warnings
  • No strict
  • No subroutines-everything in main
  • Global variables
  • No useful comments
  • No consistent coding style
  • No checking of user input
  • Address information (to/from/subject) from hidden tags
  • E-mail piped out to the copy of sendmail on the box, and
  • It even retained the name it had during testing.

Probably the only saving grace for it was that it did not try to parse its own form input, instead using CGI.pm.

While I do not yet know the proper pentience for that monstrosity (or even if it still exists), I think the note it placed against my karma may take some time still to requite.

  • Comment on Re: Worst thing you ever made with Perl

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://294769]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others having a coffee break in the Monastery: (4)
As of 2024-04-19 21:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found