my $last = ( foo() )[ -1 ];