While not negating your statements, I'd like to point out a third option, with Benchmarking. It's a middle of the road option.

#!/usr/local/bin/perl
 
use strict;
use Benchmark qw[ cmpthese ];
 
sub r{ @_[ 0 .. $#_ ] = reverse @_ }
sub s{ @{$_[0]} = reverse @{$_[0]} }
 
our @n = 1 .. 1000;
 
cmpthese( -3, {
    normal_reverse => q[ my @r = reverse @n; ],
    aliased_reverse => q[ my @r = &r( @n ); ],
    aliased_ref_reverse => q[ &s( \@n ); ],
});

__END__
                      Rate  aliased_reverse aliased_ref_reverse   norm
+al_reverse
aliased_reverse      644/s               --                -57%       
+      -77%
aliased_ref_reverse 1508/s             134%                  --       
+      -46%
normal_reverse      2793/s             334%                 85%       
+        --
[download]