Re: Text filer and assign

print join ' ', (split /\s/, $line)[1, 9, 10, 11, 12, 13, 14];

Much simpler. Regards, Karl

ŤThe Crux of the Biscuit is the Apostropheť

Comment on Re: Text filer and assign Download Code

Replies are listed 'Best First'.
Re^2: Text filer and assign by RonW (Parson) on Oct 06, 2015 at 23:17 UTC
or: `print join ' ', (split /\s/, $line)[1, 9 .. 14];`	[reply] [d/l]
Re^3: Text filer and assign by karlgoethebier (Abbot) on Oct 07, 2015 at 10:30 UTC
I swear that i dreamed last night that i forgot this... Best regards, Karl ŤThe Crux of the Biscuit is the Apostropheť	[reply]