foreach my $var (LIST) { .. }

##</code><code>##

my $var;
foreach $var (LIST) { .. }

##</code><code>##

foreach my $var (LIST) { .. }