my $n;
foreach $n ( 1, 2, 3 ) { }
$n = 'foo';