@renee: ich bin etwas verwirrt... was macht while hier per default?

my $_ kanns nicht sein, weil $_ global sein muss [1]
local $_ auch nicht, sonst wäre ein explizites local nicht notwendig.

so wie es hier aussieht wird hinter while das globale $_ explizit auf undef gesetzt!
wieso?

[1] gehörts eigentlich zu einem Package? ... tatsächlich aber immer $main::_