{ foreach my $v (...) {} } # 1
{ foreach $v (...) {} } # 2
{ my $v; foreach $v (...) {} } # 3 
{ my $v; foreach my $v (...) {} } # 4