$ perl -Mstrict -Mwarnings -le 'my (@x, @y); @x = ( "A", "B", "C" ); @y = ( "C", "D", "F" ); &test( \@x, \@y, ); sub test { my @test = @_; print "@test\n"; }'
ARRAY(0x20071958) ARRAY(0x200718e0)