批踢踢實業坊
›
看板
Perl
關於我們
聯絡資訊
返回看板
作者
Yaowei (成就你的大事)
看板
perl
標題
[問題] 請教程式內容?
時間
Mon Apr 2 22:29:25 2007
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