[nobody@archaia /root]$ perl -we 'open (MAIL, ">./foo") || die "$!";print MAIL "scrat
chymonkey.\n";'
Permission denied at -e line 1.