for my $foo(@foobar) { print $foo; }