On Mon, Jul 22, 2002 at 08:55:24PM +0200, Steffen Mueller wrote: > perl -ae 'print"@F[1..$#F-1] > $F[$#F]"'
Here's one that's two strokes shorter (and probably can be made better): perl -ae 'print"@F[1..@F-2] $F[-1]"' -- Mike -- Michael W. Thelen eval unpack u,'M*"1C/2<P,BDN-"`U+C`A(RLG*3U^>2\A+48O82UZ+SME=F%L*"1C+B(G=2HGM+"<Z,D<U4SU<(B%!.T9=5#HF-5(H)2%%/$907$`Z)B5#.E8U4BM@2&`G+EPD$+R(I.P``'