Funzione Perl shift

Descrizione

Questa funzione restituisce il primo valore in un array, eliminandolo e spostando gli elementi dell'elenco di array a sinistra di uno. Se ARRAY non è specificato, sposta l'array @_ all'interno di una subroutine o in caso contrario @ARGV. shift è essenzialmente identico a pop, tranne per il fatto che i valori vengono presi dall'inizio dell'array invece che dalla fine.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

shift ( [ARRAY] )

shift

Valore di ritorno

Questa funzione restituisce undef se l'array è vuoto altrimenti restituisce il primo elemento dell'array.

Esempio

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

#!/usr/bin/perl

@array = (1..5);
while ($element = shift(@array)) {
   print("$element - ");
}
print("The End\n");

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

1 - 2 - 3 - 4 - 5 - The End