DESS TIMHIntroduction au langage Perl
*pop (tableau)Retourne le dernier élément du tableau (et l'enlève)
print pop(@fruits);=> affiche 'cerise', @fruits devient ('amande','fraise')

• push (tableau, element)Ajoute un élément en fin de tableau (contraire de pop)
  push(@fruits, 'abricot');=> @fruits devient ('amande','fraise','abricot')

• shift(tableau)Retourne le premier élément du tableau (et l'enlève)
  print shift(@fruits)=> Affiche 'amande', @fruits devient ('fraise','abricot')

• unshift (tableau, element)Ajoute un élément en début de tableau
  unshift ('coing', @fruits);=> @fruits devient ('coing', 'fraise','abricot')

• sort (tableau)Tri le tableau par ordre croissant
  @fruits = sort (@fruits);=> @fruits devient ('abricot', 'coing', 'fraise')

• reverse (tableau)Inverse le tableau
  @fruits = reverse(@fruits);=> @fruits devient ('fraise', 'coing', 'abricot')

• splice (tableau, début, nb)Enlève nb éléments du tableau à partir de l'indice début
  @derniers = splice(@fruits, 1,2);
  => @derniers devient('coing', 'abricot') @fruits devient ('fraise')
  On peut éventuellement remplacer les éléments supprimés :
  @fruits=('fraise','pomme');
  splice(@fruits, 1,1, ('elstar','golden'));
  => @fruits contient('fraise', 'elstar','golden')

http://www.med.univ-rennes1.fr/~poulique/cours/perl/

Page 15