$ perl -e'sub n { print "Hello\n" }' -en
Hello