:-)
In all of my cgi scripts I use a little custom die subroutine so none of them just die, they die nicely.
sub dienice { print "Content-type: text/html\n\n" unless $header_printed; $header_printed = 1; my(@msg) = @_; print "<h2>Attention:</h2>\n"; print join("<br>\n",@msg); exit; }
In reply to Re^2: Perl Programmers Don't Die...
by twotone
in thread Perl Programmers Don't Die...
by blazar
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |