68user's page 掲示板

Prev< No. 3486> Next  [最新発言に戻る] [過去ログ一覧]
No. 3486 # 2003/12/25 (木) 09:56:04
>>3484 zsh
環境も書かずに質問して申し訳ありません。
HP-UX11.00です。
nawkが入っていないので、awkに変えて実行しました。
一応、上手く動きました。

cat list.txt $1 | sort -n -r | awk '
{
        i = sprintf("%d",length($1) / 3) ;
        j = sprintf("%d",length($1) % 3) ;
        if ( i > 1 ) {
                if ( j == 0 ) j = 3 ;

                str_buf = sprintf("%s",substr($1,0,j)) ;
                for ( k=0 ; k<i ; k++ ) {
                        cut_str = substr($1,j+(k*3)+1,3) ;
                        if ( cut_str == "" ) break ;

                        str_buf = sprintf("%s,%s",str_buf,cut_str) ;
                        cut_str = "" ;
                }
        } else {
                str_buf = $1 ;
        }
        printf("%10s %s\n",str_buf,$2) ;
}'

Prev< No. 3486> Next  [最新発言に戻る] [過去ログ一覧]