Fonction Perl pop
La description
Cette fonction renvoie le dernier élément de ARRAY, en supprimant la valeur du tableau. Notez que ARRAY doit être explicitement un tableau, pas une liste.
Si ARRAY est omis, il affiche la dernière valeur de @ARGV dans le programme principal ou lorsqu'il est appelé dans eval STRING, ou les blocs BEGIN, CHECK, INIT ou END. Sinon, il tente d'extraire les informations du tableau @_ dans un sous-programme. C'est l'opposé du push, qui lorsqu'il est utilisé en combinaison, vous permet de mettre en œuvre des "stacks".
Notez qu'après l'application pop le tableau sera raccourci d'un élément.
Syntaxe
Voici la syntaxe simple de cette fonction -
pop ARRAY
pop
Valeur de retour
Cette fonction renvoie undef si la liste est vide, sinon le dernier élément du tableau.
Exemple
Voici l'exemple de code montrant son utilisation de base -
#!/usr/bin/perl -w
@a = (1, 2, 3, 4);
print("pop() ", pop(@a), " leaves ",@a, "\n");
Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -
pop() 4 leaves 123