上段:カテゴリ | 中段:投稿日 | 下段:サブテーマ | ブログナンバー:172 |
![](https://blogimg.goo.ne.jp/user_image/67/eb/5552ec670885d5d739c461ea90a0dba3.png)
01月15日(月)
連想配列のsortの方法はWebの各講座の中で説明されている。しかし実用ではExcelのようにテーブルの行単位にsortしなければならない。私は以下のような死亡データを新聞記事などから収集して毎日記録しているが、新聞記事だから日付が前後することがある。これを日付順に並べ替えるにはどうするか。その方法をここに記しておく。 | |||
データファイル'file.dat'に以下の書式で記録されているとする。
|
|||
perlスクリプトはデータの読み込みから始まる。 open(IN,"<./file.dat"); # 連想配列を数値(value)で昇順に並べ替える |
|||
①の説明 連想配列%w4は次のように作成される %w4=('1.30,山田芳雄,山田書店会長,老衰,自宅,妻,88'=>61, '1.28,鈴木和夫,元K社社長,腎細胞がん,病院,妻,80'=>59, '2.1,田中俊夫,被災者の会所属,肺炎,病院,妻,83'=>63, '2.10,丸山まるお,小説家,大腸がん,病院,長男,77'=>72, '2.8,トムアトム,歌手,膀胱がん,自宅,不明,84'=>70); これを受けて,%w4をvalue の大きさで昇順に並べ変えると この後は配列@w5がkeyの集合になっているからそのままkey
昔取った杵柄perlを活用して,現在(2024年06月)は, サッカーチーム FC岐阜 をより深く知るための動画ならぬ動具を作って楽しんでます。 公開ページは,http://cs-gifu.que.jp/ だ。一度訪ねてくれ。 |