In Perl an array is not a pointer.
You can get the reference of an array with the \
operator:
my @array = ( 1, 2 );
my $array_ref = \@array;
$array_ref
will then point to the original array (as in C)
${$array_ref}[0] = 3
will change the first cell of the original array (i.e., $array[0]
will be 3)