# Last line of a file
   perl -pe '$*=$_}{$_=$*' file

##</code><code>##

   perl -pe '$*||=$_; $\=$_}{$_=$*' file

##</code><code>##

   # Exit after first match
   perl -ne 'print; last if /foo/' file