Você está aqui: Perl ::: Dicas & Truques ::: Arrays e Matrix (Vetores e Matrizes)

Como adicionar um novo elemento (ou outro array) no final de um array

Quantidade de visualizações: 7832 vezes
Em algumas situações precisamos adicionar um novo item (ou um outro array inteiro) no final de um array. Para isso podemos usar a função push(). Esta função recebe o array que receberá o novo elemento e o elemento propriamente dito. O retorno da função é um novo array já contendo o novo elemento. Veja um exemplo:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

# Trabalhando com arrays em Perl

# declara e inicializa um array de inteiros
@valores = (211, 5, 3, 8, 2, 4);

# vamos exibir os valores do array
for($i = 0; $i < scalar(@valores); $i++){
  print @valores[$i] . "  ";
}

# vamos adicionar um novo elemento no final do
# array
$valores = push(@valores, 10);
print "\n";

# vamos exibir os valores do array novamente
for($i = 0; $i < scalar(@valores); $i++){
  print $valores[$i] . "  ";
}

Veja agora um exemplo no qual adicionamos um array inteiro no final de outro array:

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

# Trabalhando com arrays em Perl

# declara e inicializa um array de inteiros
@valores = (211, 5, 3, 8, 2, 4);

# vamos exibir os valores do array
for($i = 0; $i < scalar(@valores); $i++){
  print @valores[$i] . "  ";
}

# declara e inicializa um array de floats
@valores2 = (5.3, 8.0, 1.5, 45.20);

# vamos adicionar o segundo array no final
# do primeiro
$valores = push(@valores, @valores2);
print "\n";

# vamos exibir os valores do array novamente
for($i = 0; $i < scalar(@valores); $i++){
  print $valores[$i] . "  ";
}

Como é prática em Perl, a ausência dos parênteses na chamada ao método push() não altera o efeito desejado:

$valores = push @valores, @valores2;

Link para compartilhar na Internet ou com seus amigos:

Veja mais Dicas e truques de Perl

Dicas e truques de outras linguagens

Códigos Fonte

Programa de Gestão Financeira Controle de Contas a Pagar e a Receber com Cadastro de Clientes e FornecedoresSoftware de Gestão Financeira com código fonte em PHP, MySQL, Bootstrap, jQuery - Inclui cadastro de clientes, fornecedores e ticket de atendimento
Diga adeus às planilhas do Excel e tenha 100% de controle sobre suas contas a pagar e a receber, gestão de receitas e despesas, cadastro de clientes e fornecedores com fotos e histórico de atendimentos. Código fonte completo e funcional, com instruções para instalação e configuração do banco de dados MySQL. Fácil de modificar e adicionar novas funcionalidades. Clique aqui e saiba mais
Controle de Estoque completo com código fonte em PHP, MySQL, Bootstrap, jQuery - 100% funcional e fácil de modificar e implementar novas funcionalidadesControle de Estoque completo com código fonte em PHP, MySQL, Bootstrap, jQuery - 100% funcional e fácil de modificar e implementar novas funcionalidades
Tenha o seu próprio sistema de controle de estoque web. com cadastro de produtos, categorias, fornecedores, entradas e saídas de produtos, com relatórios por data, margem de lucro e muito mais. Código simples e fácil de modificar. Acompanha instruções para instalação e criação do banco de dados MySQL. Clique aqui e saiba mais

Linguagens Mais Populares

1º lugar: Java
2º lugar: Python
3º lugar: C#
4º lugar: PHP
5º lugar: C
6º lugar: Delphi
7º lugar: JavaScript
8º lugar: C++
9º lugar: VB.NET
10º lugar: Ruby



© 2025 Arquivo de Códigos - Todos os direitos reservados
Neste momento há 48 usuários muito felizes estudando em nosso site.