sub make_aref {
        my @array = @_;
        return \@array;
    }

    my $aref = make_aref(42, 13, 47);
    print "$aref : @$aref\n";
    __END__

Output:
    ARRAY(0x80f6888) : 42 13 47

##</code><code>##

    my $aref = [42, 13, 47];