for $_(@foobar) {
    print $foo
}