foreach my $foo qw(bar baz) {   print $foo,$/  }

##</code><code>##

foreach my $foo (qw(bar baz)) { }