my $result = [ func(@args) ]->[2];

##</code><code>##

*scalar = \do { my $x = 1 };