Programando em Perl (parte 2)

andrezc

Nesta segunda parte da série programando em Perl veremos como declarar e manipular arrays.

[ Hits: 36.676 ]

Por: André em 30/04/2010 | Blog: http://127.0.0.1

4 0

Denuncie Favoritos Indicar Impressora

Funções e arrays - função push

De início, prepare a estrutura do nosso programa.

#!/usr/bin/perl

@letras = ("a","b","c");
exit;

Vamos começar conhecendo a função push().

Para que serve o push()?

A função push é utilizada para a inserção de elementos no determinado array. Por exemplo, se eu tenho o array a,b e c, eu poderia inserir o elemento d. Só que o push() só serve para inserir elementos no final do array, neste caso o elemento d poderia ser inserido depois do elemento c, mas não antes do elemento a.

Vamos conhecer o seu uso:

#!/usr/bin/perl

@letras = ("a","b","c");
push(@letras, "d");
exit;

Agora vamos fazer um antes e depois. Como assim?

Exibirei o array "letras" antes da função push() e exibirei o array "letras" novamente depois da função push().

#!/usr/bin/perl

@letras = ("a","b","c");
print("@letras\n");
push(@letras, "d");
print("@letras\n");
exit;

A saída deste programa seria:

a b c
a b c d

Vamos agora fazer algo mais interessante, considerando o que aprendemos até agora:

#!/usr/bin/perl

@letras = ("a","b","c");
$x = $#letras + 1;
print("Atualmente nos temos $x letras. Sao elas: \n@letras\n");
push(@letras, "d","e","f","g");
$y = $#letras + 1;
print("Agora temos $y letras. Sao elas: \n@letras\n");
exit;

A saída do programa acima seria:

Atualmente nos temos 3 letras. Sao elas:
a b c
Agora temos 7 letras. Sao elas:
a b c d e f g

Bem fácil de usar, não acham?! Também não estarei explicando o código acima, pois tudo que eu usei nele foi explicado anteriormente.

Página anterior Próxima página

Páginas do artigo

   1. Introdução
   2. Utilizando os arrays
   3. Utilização das variáveis com os arrays
   4. Funções e arrays - função push
   5. Funções e arrays - função pop
   6. Conclusão

Outros artigos deste autor

Trabalhando com a interface gráfica em Java

Deixando o Debian redondo após instalação

Pentesting on PHP apps: XSS

L.F.A.Q : Linux Frequently Asked Questions

Instalando e utilizando o LimeWire no Debian

Leitura recomendada

Comparação entre Tcl e Perl

Um pouco de PERL

Programando em Perl (parte 1)

Módulos CPAN no Debian e distros GNU/Linux em geral

Instalação de MRTG em ambiente Windows

Comentários

[1] Comentário enviado por lestatwa em 02/05/2010 - 13:31h

Muito bem explicado o artigo! Você esta de parabéns!
Programo em C, Python e PHP, porém sempre ouvi falarem muito bem de Perl e tinha curiosidade.
Aguardo ansioso o artigo sobre C++!
Abraço!
Luís Eduardo Boiko Ferreira

0 0

[2] Comentário enviado por andrezc em 02/05/2010 - 14:05h

Obrigado Luis Eduardo, os próximos artigos dedicarei a 3º parte do Perl, se tudo correr bem, com direito a orientação e objetos e tudo e logo depois vou iniciar com o C++, levando até a orientação a objectos.

Um abraço.

1 0

[3] Comentário enviado por removido em 12/08/2010 - 15:53h

Muito interessante.

1 0

[4] Comentário enviado por heraldoaraujo em 26/07/2011 - 09:17h

Adorei o artigo mas quem quer aprofundar o conhecimento de perl recomendo o livro "Perl como programar" do autor Deite

1 0