perl -i -pe '$last = $_; s/foo/bar/ if eof; END{print $last}' file

##</code><code>##

    perl -i -ne 's/foo/bar/ if eof; print $last = $_; END{print $last}' file