print STDOUT $_;

##</code><code>##

perl -le '$_ = "%n"; printf STDOUT $_'