Re: Reversing file

Tuomo Salo <[email protected]> Fri, 11 Mar 2005 10:46:12 +0200

Newsgroups	gmane.comp.lang.perl.golf
Message-ID	<[email protected]>

Johnson, Roy R SIEP wrote:
> Minus another char:
> perl -pi -e 's//<>/e;eof||redo' in.file

Choosing another loop construct lets you drop the annoying ";"

perl -pi -e 's//<>/ewhile!eof' in.file

   -bass