Descrição
Esta função retorna o último elemento de ARRAY, removendo o valor da matriz. Observe que ARRAY deve ser explicitamente uma matriz, não uma lista.
Se ARRAY for omitido, ele retira o último valor de @ARGV no programa principal ou quando chamado em eval STRING ou nos blocos BEGIN, CHECK, INIT ou END. Caso contrário, ele tenta extrair informações do array @_ dentro de uma sub-rotina. É o oposto de push, que quando usado em combinação, permite que você implemente "pilhas".
Observe que depois de aplicar pop o array será reduzido em um elemento.
Sintaxe
A seguir está a sintaxe simples para esta função -
pop ARRAY
pop
Valor de retorno
Esta função retorna undef se a lista estiver vazia e o último elemento do array.
Exemplo
A seguir está o código de exemplo que mostra seu uso básico -
#!/usr/bin/perl -w
@a = (1, 2, 3, 4);
print("pop() ", pop(@a), " leaves ",@a, "\n");
Quando o código acima é executado, ele produz o seguinte resultado -
pop() 4 leaves 123