foreach my $a(@bar) {
my $foo = &return_something($a);
}