Zdravim,
zajimalo by me, kam se podela hodnota $_
$_ = 'pepa';
@pole = qw( jeden dva tri );
while ( $_ = shift @pole ) { print "$_\n" }
print "$_\n";
Posledni `print' vytiskne pouze "\n" - neobjevi se ani warning, ze by
$_ byl undef...
--
JP