Re: A little text file munging golf on the list

[Marius Ascheberg]

On Thu, 13 Mar 2003 16:14:21 +0100
Marius Ascheberg <[EMAIL PROTECTED]> (I) wrote:

> #!perl -p0
> s/^((\S+).+)\n\2/$1/m&&redo

Sorry, but this is just wrong.
It handles 
a a
ab a
wrong.

So we're back to 32 strokes.

#!perl -p0
s/^((\S+).+)\n\2 /$1 /m&&redo