ex)1 2 3 4 5 6 7 8 9 10 11 12 이런식의 파일을
결과)1 7 2 8 3 9 4 10 5 11 6 12 이렇게 만들려고 하는데 어떻게 하면 될까요 퓨
perl -nae 'map { push @{$H{$_}}, @F[$_] } 0..$#F }{ print "@{$H{$_}}\n" for sort keys %H' <파일명>
이렇게 되네요 퓨
perl -nae 'map { push @{$H{$_}}, @F[$_] } 0..$#F }{ print "@{$H{$_}}\n" for sort keys %H' <파일명>