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