[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[connect24h:9819] Re: 教えて、ExcelとAccessの偉い人



にしゅうです。

せっかくなので・・・Rubyだとこうでしょうか?


r=Hash.new(0)
r[chomp]+=1 while gets
r.to_a.sort{|a,b|b[1]<=>a[1]}.each{|a|
 print "#{a[1]}\t#{a[0]}\n" }



// 株式会社 山田農園 ECビジネス課
// 「いい庭.jp」 http://e-28.jp/
// 二宗(にしゅう) nisyu@xxxxxxxxxxxx


--[PR]------------------------------------------------------------------
┏━━━━━━━┓ スポーツオーソリティオンラインショップ!
┃ スポーツ用品 ┃ お持ち帰りに悩む大型商品も、メーカー直送で注文も楽々。
┃  買うなら  ┃ 有名ブランドの2005年モデルもいち早くお届け。
┗━━┳━┳━━┛ 手に入りにくい人気商品も、ネット限定在庫でご注文受付中!
 http://ad.freeml.com/cgi-bin/ad.cgi?id=d56eG
------------------------------------------------------------------[PR]--
■GMO INTERNET GROUP■ GMO INTERNET www.gmo.jp