How about making this guide a bit more usefull. I'm sure you've seen this code before:

BEGIN
{#outputs al errors to 
  use CGI::Carp qw(carpout);
  open(LOG, ">>myScript.err.log") or die "can't W 2 myScript.cgi.err.l
+og: $!";
  carpout(*LOG);
}
[download]

 
___crazyinsomniac_______________________________________
Disclaimer: Don't blame. It came from inside the void
perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"