Re: [問題] 請問排序的問題
#!/usr/bin/perl
$word_hash{apple}=3;
$word_hash{time}=7;
my @rank = sort {$word_hash{$b} <=> $word_hash{$a}} keys %word_hash;
foreach $get_word(@rank) {
print "$get_word=$word_hash{$get_word}\n";
}
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.114.71.160
推
08/15 15:47, , 1F
08/15 15:47, 1F
討論串 (同標題文章)
完整討論串 (本文為第 2 之 2 篇)：
1
1
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
