foreach $loop_ralias (@{$refarrayptr})
{
    my $ralias = $loop_ralias;
    # ...
}