Perl ViittausArray

\\ n " ; minun arr = ( " yksi " , " kaksi " , 3 , 4 ) , minun $ Aref = \\ arr ; tulostaa $$ aref [ 1] . " Minun $ arref = [ " yksi " , " kaksi " , 3, 4] ; print $ arref - > [ 3] ; painaa "