% perl -lane '/^sdk/ and push(@tmp,[@F]);END{map{print join(qq/ /,@{$_})}sort{$a->[11]<=>$b->[11]}@tmp}' iostat.log この例では、デバイスを sdk だけに絞って、%util(11列目) でソートしています。 動的に二次元配列を作る方法は以下を参考にしまし…