perlかシェルスクリプトで数値の個数をカウントする方法を教えてください

質問

すいません、スクリプト書き初心者です。

0.001
0.003
0.003
0.005
0.005
のような数値が書かれたファイルがあったとき
数値の個数を数えて
0.001　1
0.003　2
0.005　2
のように標準出力やファイルに返す方法を教えてください

回答No.2

Tacosan

シェルスクリプトでできてるのになぜ Perl のスクリプトが欲しいのかよくわかりませんが,
perl -ne 'chomp; $item{$_}++; END { for ({ $a <=> $b } keys %item) { print "$_ $item{$_}\n" } }'
でダメかなぁ?

回答No.1

chaimasuka

数値がかかれたファイルの名前を in.txt とする。

シェルスクリプトなら、１行。

$ sort in.txt | uniq -c

すでに、sort された状態なら
$ uniq -c in.txt

だけでＯＫ

お礼

>chaimasukaさん
ありがとうございます！！
まさに求めていたものがスパッとできて気持ちよかったです。

あとはperlでできれば。。。