UNIX for Dummies Questions & Answers

Hello all,
I have a text file that is arranged:

name 3 7 2 9 5
jim a d e g k
max d g u x g
rob f w v k o

This is just an example as my real file has >1000 individuals and >64,000 columns. I need to rearrange the file so that the columns appear in numerical order so that

name 1 2 3 4 5 6 .....
jim d e a u k g
max w u d n g f
rob w v f u o k

Is there an easy way to do this? I have looked up all of the "sort" options and it appears you can only sort within one or more columns whereas I need to sort the columns themselves....

Thanks,
Doob

If I understand correctly:

Code:

perl -lane'
	$. == 1 and @_{ @F[ 1 .. $#F ] } = 1 .. $#F;
	print "@F[ 0, @_{ sort { $a <=> $b } keys %_ } ]";
' infile

And there was me writing the World's next bubble sort routine

... and of course we need to sort once to get the order, not for every record

The code should be:

Code:

perl -lane'
    @_{ @F[ 1 .. $#F ] } = 1 .. $#F
      and @f = ( 0, @_{ sort { $a <=> $b } keys %_ } )
      if $. == 1;
    print "@F[@f]";
' infile