[問題] 請教一個關於each函數的問題

[TONICOM (TONICOM)]

請教一個關於each函數的問題

===========以下範例程式======================
%hash = (undef,undef);

while( @array = each(%hash) ){
       print scalar @array, "\n";
     }

$wait = <STDIN>;

while( @array = (undef,undef) ){
       print scalar @array, "\n";
     }

===============================================


請問為什麼第一個while迴圈會跳出 , 但是第二個卻是無窮迴圈??

我記得駱駝書有說 , each函數最後會return (undef,undef), 但是為什麼同是在純量語境(while)卻會有不同的結果,
請指點一下小弟迷津 , 我到底觀念哪裡出問題 ??

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 219.87.80.69
推 LyinZ:each 函數最後是 return () 而不是 (undef, undef)
→ TONICOM:感謝!!原來是我誤解了駱駝書!!