[問題] 請教程式內容?
while(<LINE>){
s/(\w+)/$w{lc($1)}++/eg;
END{print $w{$_}," $_\n" foreach (sort keys %w);}
}
其中 為什麼使用END呢?
發現如果將END拿掉的話,則會跑很多次出來
而若有END的話 ,則是只會出現一次結果?
先謝過各位囉^^
--
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.96.202
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章