今日の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
- 「フューチャリスト宣言」読了