in reply to eval + no warnings = no memory
Simply running
perl -e "eval 'no strict;' while (0==0);" [download]
perl -e "eval {no strict;} while (0==0);" [download]