Hi monks -

This code does not give me what I want / would expect. Apologies for the messyness I cobbled this test script together quickly :

use strict;
use Data::Dumper;

sub Test
{
    my($OldRef, $RefToRef)    = @_;

    $RefToRef    = $OldRef->{ AA };

    printf STDOUT ( "-->%s<--\n-->%s<--\n", Dumper( $OldRef ), Dumper(
+ $RefToRef ) );
}

my( $NewRef );
my( $OusideRef )    = {
                AA    => 
                    [
                        1,
                        2
                    ]
            };




Test($OusideRef, $NewRef);

printf STDOUT ( "-->%s<--\n-->%s<--\n", Dumper( $NewRef ), Dumper( $Ou
+sideRef ) );
[download]

I want this to result in $NewRef being a reference to the array in $OusideRef. I've messed around with backslashes and curley brackets etc., but I can't get it to work. I definately want to be able to create the reference within the sub, rather than outside it.

Thanks!