my $x = (foo(1))[0];