[Moscow.pm] Как очистить массив

[Denis Evdokimov]

while так использовать  очень странно.
Но чем то напомнило
while(chomp $str){}