Um pouco de PERL

Rafael Martins

Neste artigo tento compartilhar com vocês um pouco do que aprendi da linguagem PERL (Practical Extraction and Report Language). A Perl é uma linguagem sem burocracia, para todos os gostos. Tem uma enorme flexibilidade e poder de operação. Espero que o material possa contribuir com o enriquecimento da comunidade. Para aqueles que ainda não conhecem essa linguagem, fica o convite para a leitura...

[ Hits: 41.726 ]

Por: Rafael Lebrão Martins em 25/09/2007

1 0

Denuncie Favoritos Indicar Impressora

Escalares

Trabalhando com variáveis escalares

A composição da variável escalar é extremamente simples, o $ (identificador da variável) seguido do nome. Uma variável escalar pode receber qualquer forma de valor escalar (números de ponto flutuante, inteiros, strings, e até fazer referência a uma outra variável).

Usando variáveis escalares:

Ex1:

1 #!/usr/bin/perl
2 use strict;
3 use warnings;
4 my $escalar = "valor escalar";
5 my $escalar = 45;

O operador "my" declara uma ou mais variáveis privadas para existirem apenas dentro do bloco, sub-rotina, eval ou arquivo delimitador mais interno. Uma variável introduzida com "my" só é válida no escopo em que foi definida.

Ex2:

1 #!/usr/bin/perl
2 use strict;
3 use warnings;
4 print "Digite o nome dessa comunidade: ";
5 my $comunidade = <STDIN>;
6 chomp $comunidade;
7 print "O nome da comunidade é $comunidade", "\n";

Neste exemplo podemos perceber algo diferente, o "<STDIN>" entrada padrão. Neste caso, o valor da variável "$comunidade" será o texto digitado pelo usuário mais o caractere de nova linha "\n". A função "chomp" apaga um caractere de nova linha final do término de uma string contida numa variável.

Suponhamos que o usuário digite "viva o linux" e tecle enter. O valor de "$comunidade" será "viva o linux\n". Depois de utilizada a função "chomp" esse valor passará a ser "viva o linux".

Ex3:

1 #!/usr/bin/perl
2 use strict;
3 use warnings;
4 my $escalar = "valor escalar";
5 my $string = "$escalar";

Neste exemplo declaro o valor da variável "$string" como sendo a variável "$escalar". Portanto, se eu usar o print para imprimir o valor de "$string" a saída será "valor escalar".

Página anterior Próxima página

Páginas do artigo

   1. Introdução
   2. Exemplos simples
   3. Variáveis
   4. Escalares
   5. Arrays e algumas funções
   6. Documentação

Outros artigos deste autor

Capital Intelectual

Firewall seguro com o IPTables

Matriz <-> Filial com o OpenVPN

Leitura recomendada

Programando em Perl (parte 2)

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

Programando em Perl (parte 1)

Comparação entre Tcl e Perl

Script Perl para consultas em base LDAP e/ou Active Directory

Comentários

[1] Comentário enviado por cguerra em 25/09/2007 - 11:07h

Muito bom o artigo, porém poderia explicar, ou até mesmo exemplicaficar melhor as variaveis...

no caso, usou mais string do que tudo no mundo, e não usamos só string no nosso dia-a-dia, mas mesmo assim está muito bom este artigo, com uma linguagem bem sintetisada e fácil.

abraços.

0 0

[2] Comentário enviado por igorcemim em 25/09/2007 - 13:34h

Otimo artigo.
Eu melhorei um script em perl. Se alguem quiser pegar o endereço é:
http://www.vivaolinux.com.br/scripts/verScript.php?codigo=2990

É bom pra quem tah estudando. Ou pra quem que um gerador de senhas seguras.

Abraços

0 0

[3] Comentário enviado por f_Candido em 25/09/2007 - 19:39h

Show de Bola. Nunca tinha reparado sobre o PERL, agora vai ser bem útil.
Abraços

0 0

[4] Comentário enviado por fabio em 26/09/2007 - 05:37h

Tenho um carinho especial pelo Perl, além de ter sido minha primeira linguagem de programação no Linux, é uma ferramente muito poderosa pra criação de rotinas de manutenção de servidores. Seu suporte a expressões regulares é único!

Ótimo artigo.

0 0

[5] Comentário enviado por rafael martins em 26/09/2007 - 06:56h

Obrigado a todos pelos comentários. Com relação ao "suporte a expressões regulares", Fábio, é único mesmo. O Perl interage com as RE's maravilhosamente bem. Utilizo bastante o Perl em conjunto com RE para a manutenção do Firewall (iptables), proxy, controle de banda, só para citar alguns! Vou escrever um próximo artigo sobre Regex para postar na Comunidade. Um abraço a todos.

0 0

[6] Comentário enviado por galmeida07 em 26/09/2007 - 08:14h

Existe alguma documentação específica para iniciantes em Perl? Otimo artigo, sempre quis aprender, mas nunca achava nada 'introdutorio'. O brigado e parabéns!

0 0

[7] Comentário enviado por rafael martins em 26/09/2007 - 12:49h

Dê uma olhada neste link. Há bons materiais de introdução ao Perl, traduzidos para o Português.

http://www.perl.org.br/bin/view/Perldoc/WebHome

Se você não tiver dificuldades com a Língua Inglesa, veja o link abaixo também.

http://perldoc.perl.org/

O livro da Deitel, "Perl Como Programar" é excelente para quem está iniciando com Perl.. Se você quiser mesmo aprender a linguagem, invista um pouquinho num livro como este..
Um abraço.

0 0

[8] Comentário enviado por eskenT em 27/12/2007 - 00:26h

Cara, muito bom o conteudo.
sobre a documentação, o unico problema é que são todos em inglês.
mas também estou dificultando as coisas, programação sem saber inglês não é programação.

0 0