Funzione pop Perl

Descrizione

Questa funzione restituisce l'ultimo elemento di ARRAY, rimuovendo il valore dall'array. Notare che ARRAY deve essere esplicitamente un array, non un elenco.

Se ARRAY viene omesso, estrae l'ultimo valore da @ARGV nel programma principale o quando viene chiamato all'interno di eval STRING, o nei blocchi BEGIN, CHECK, INIT o END. Altrimenti, tenta di estrarre le informazioni dall'array @_ all'interno di una subroutine. È l'opposto del push, che se usato in combinazione, consente di implementare "stack".

Nota che dopo l'applicazione pop l'array verrà accorciato di un elemento.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

pop ARRAY

pop

Valore di ritorno

Questa funzione restituisce undef se la lista è vuota altrimenti l'ultimo elemento dell'array.

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base:

#!/usr/bin/perl -w

@a = (1, 2, 3, 4);
print("pop() ", pop(@a), "   leaves  ",@a, "\n");

Quando viene eseguito il codice sopra, produce il seguente risultato:

pop() 4  leaves 123