From Chapter 32.5 of Programming Perl Version 3 "CGI::Carp":
The module is also kinder to web surfers, since
premature death in a CGI script tends to cause
inscrutable "Server 500"
errors when the proper HTTP header doesn't get out
to the server before your program pegs out, and this module makes sure that doesn't
happen. The carpout function redirects all warnings and errors
to the filehandle specified.
perladdict, please be careful to attribute sources when you are quoting them, otherwise it might tend to appear that you are taking credit for words which were not originally yours.
s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/
| [reply] |