Perl référence à un Array

\\ n " ; mon arr = ( " un " ," deux " , 3 , 4 ) ; my $ Aref = \\ arr ; . Print $$ aref [ 1 ] " my $ arref = [" un "," deux " , 3, 4 ] ; imprimer arref $ - > [ 3 ] ; impression "