perl -ple'BEGIN { print "new text" }' infile > outfile

##</code><code>##

perl -i -ple'BEGIN { print "new text" }' file