今日のPerl
公開日:
:
最終更新日:2014/02/04
プログラミング
記事内に広告を含む場合があります。記事内で紹介する商品を購入することで、当サイトに売り上げの一部が還元されることがあります。
my @keys = sort {
"\L$last_name{$a}" cmp "\L$last_name{$b}"
or
"\L$a" cmp "\L$b"
} keys %last_name;
foreach(@keys){
print "$last_name{$_}, $_\n";
}
関連記事
- PREV
- 今日のPerl
- NEXT
- 「フューチャリスト宣言」読了