Re: retaining first value, joining with the rest of the row values ?

[Dr.Ruud]

Brad Baxter schreef:

> perl -F, -lane'print"$F[0],$F[$_]"for 1..$#F;' data

  perl -F, -lane'print"$F[0],$_"[EMAIL PROTECTED]' data

  perl -pe'1while s/^((.*?),.*),/$1\n$2,/' data

-- 
Affijn, Ruud

"Gewoon is een tijger."

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/