sub2( sub1() ) ;

##</code><code>##

{ # minimal scope for @temp
   my @temp = sub1() ;
   sub2 ( \@temp ) ;
} # end of local scope

##</code><code>##

sub2( some_code( sub1() )  )