Você está aqui: Perl ::: Dicas & Truques ::: Arrays e Matrix (Vetores e Matrizes) |
Como adicionar um novo elemento (ou outro array) no início de um arrayQuantidade de visualizações: 7172 vezes |
Em algumas situações precisamos adicionar um novo item (ou um outro array inteiro) no início de um array. Para isso podemos usar a função unshift(). 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 o valor 150 no início do array $valores = unshift(@valores, 150); 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 início 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.2, 1.5, 45.20); # vamos adicionar o segundo array no início # do primeiro $valores = unshift(@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 unshift() não altera o efeito desejado: $valores = unshift @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 |
Software 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 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 |