[nobody@archaia /root]$ perl -we 'open (MAIL, ">./foo");print MAIL "scratchymonkey.\n
";'
print on closed filehandle main::MAIL at -e line 1.