Programando em Perl (parte 1)

Neste artigo veremos um pouco sobre o Perl, que é uma linguagem de programação. Veremos alguns conceitos básicos e iniciais para programar.

[ Hits: 69.916 ]

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


Variáveis e números



Primeiramente, o que são variáveis?

As variáveis são usadas para armazenar valores, vamos supor que o programa declare uma variável chamada nome e pergunte:

Qual é o seu nome?

Quando eu digitar meu nome a ele ele vai guardar esse nome digitado e vai imprimí-lo, isso que ele vai imprimir é o valor da variável.

Um exemplo mais prático, que meus professores de programação sempre usaram:

Eu tenho duas caixas, uma se chama A e a outra se chama B, cada caixa dessa receberá um valor, seguindo o seguinte algoritmo:

INICIO
declare nome;
declare sobrenome;
imprima Qual e seu nome ?
leia nome
imprima qual e o seu sobrenome ?
leia sobrenome
imprima seu nome completo e $nome $sobrenome
FIM

Esse nome e sobrenome eram duas variáveis, e essas variáveis que chamaremos de caixas receberam um valor, por exemplo, a variável nome recebeu um valor quando o usuário digitou seu nome logo após aparecer "Qual é o seu nome?". Essa valor foi para "caixa" e ficou guardadinho lá, até nós precisarmos dele.

Só lembrando que essas caixas não existem, é só um exemplo.

Neste artigo nós estaremos dando o valor a variável, algo como:

INICIO
declare a;
a = opa
declare b;
b = beleza?
imprima a b
FIM

Vamos agora passar para a prática:

Como criar uma variável em Perl?

Simples! Insira o sinal de dólar e logo após o nome da variável, como:

$variavel

Algumas regras para se criar uma variável:

O nome da variável pode começar com uma letra tanto maiúscula quanto uma letra maiúscula ou com um underline. O nome da variável pode conter números, só que não na primeira letra.

Exemplo:

$123

está errado, poderia-se usar:

$_123 = 1;

Neste caso estaríamos dando o valor 1 para variável _123.

Criando o primeiro exemplo com números:

#!/usr/bin/perl

$num1 = 1;
print "Número: $num1 \n\n\n";
exit;

Neste caso estaríamos imprimindo o número 1, que é o valor da variável num1.

Imprimindo mais de um número:

#!/usr/bin/perl

$num1 = 15;
$num2 = 22;
$num3 = 34;

print "Números:\n$num1 \n$num2 \n$num3 \n\n\n";
exit;

Neste caso quando nos interpretarmos receberíamos:

Números:
15
22
34

Imprimiria num1 (15) e pularia uma linha, imprimiria num2 (22) e pularia uma linha, imprimiria num3 (34) e pularia uma linha.

Realizando uma operação matemática simples

Vamos agora realizar uma operação matemática simples usando as variáveis, seguindo o seguinte algoritmo:

INICIO
declare num1;
num1 = 50
declare num2;
num2 = 80
declare resultado;
resultado = num1 + num2
FIM

Passando para o Perl teríamos o seguinte código:

#!/usr/bin/perl

$num1 = 15;
$num2 = 22;
$resultado = $num1 + $num2;

print "Resultado da soma de $num1 com $num2: $resultado\n\n\n";
exit;

O que fizemos foi o que está no algoritmo, declaramos 3 variáveis, a num1, a num2 e a resultado, a variável resultado somava o valor da variável num1 com a da variável num2 e depois imprimimos o valor de todas essas variáveis e pulamos 3 linhas. Interpretando este código teríamos:

Resultado da soma de 15 com 22: 37

Página anterior     Próxima página

Páginas do artigo
   1. Introdução e instalação
   2. O primeiro contato
   3. Variáveis e números
   4. Variáveis e strings
Outros artigos deste autor

Introdução ao Anonimato na Web - Web Anonimity

Fedora 12 - instalação e uso

Deixando o Debian redondo após instalação

Pentesting on PHP apps: XSS

CrossOver - Programas de Windows em seu GNU/Linux

Leitura recomendada

Comparação entre Tcl e Perl

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

Programando em Perl (parte 2)

Um pouco de PERL

Catalyst Framework Perl - (parte 2)

  
Comentários
[1] Comentário enviado por removido em 07/04/2010 - 09:48h

Boa iniciativa. Parabéns

[2] Comentário enviado por gleisonbs em 07/04/2010 - 13:35h

Muito bom!

No aguardo da parte 2. :)

[3] Comentário enviado por pantufa4 em 07/04/2010 - 14:04h

obrigado!!! para um iniciado como eu esta introdução é cinco estrelas :)))) num ,maximo de ***** tank's

[4] Comentário enviado por valterrezendeeng em 07/04/2010 - 14:20h


Parabens !!!

Gostei da Introdução...

Estou aguardando o curso Completo .. rsrsrs

Abraço

[5] Comentário enviado por fnx-15 em 07/04/2010 - 20:47h

show! gostei pak's principalmente para um iniciante como eu

[6] Comentário enviado por SamL em 08/04/2010 - 15:31h

Gostei do artigo
Valeu!

[7] Comentário enviado por jthomaz em 10/04/2010 - 16:24h

só faltou citar o " my " antes das variaveis :S

[8] Comentário enviado por fernandoamador em 12/04/2010 - 08:34h

Ótimo artigo...

[9] Comentário enviado por rodrigozanuzzo em 12/04/2010 - 14:10h

Muito bom, parabéns.

[10] Comentário enviado por daniel.capua em 17/04/2010 - 11:00h

Nunca achei que fosse aprender algo de PERL, pelo que me diziam era uma linguagem muito básica e até em desuso, passei a procurar mais sobre shell, php e C com isso, mas realmente concordo que aprender uma liguagem a mais nunca é demais, ainda mais quando de forma tão didática. Espero que faça do VOL seu caderno online compartilhado, para podermos compartilhar deste aprendizado.

[11] Comentário enviado por edivandoflf em 30/06/2010 - 08:44h

Já tinha ouvido falar sobre essa linguagem mas nunca tinha parado para estudar.

Valeu pela a iniciativa.

[12] Comentário enviado por lbneto em 27/03/2011 - 18:26h

Brother vc saberia me dizer como faz para usar a comparação deste modo

a<=>b

eu sei que se a for menor q b ele retorna um negativo
se a = b ele retorna 0
e se a>b ele retorna 1

Minha duvida é como eu faço, devo declarar uma variavel para pegar o resultado e depois fazer um if para ver se foi maior, menor ou igual?

Valeu abraço.

[13] Comentário enviado por AyrtonGomes em 05/02/2012 - 03:18h

Ótimo a linguagem parece ser ser de fácil entendimento, e ainda você publicando um ótimo artigo como este fica facil entender, obrigado x)

[14] Comentário enviado por arcanosam em 08/07/2015 - 11:17h

Gostei muito. Busquei saber sobre esta linguagem por conta do OTRS (http://otrs.github.io/)

Bem simples... como já conheço um pouco o PHP, vi que há semelhanças...

Obrigado e parabéns pela simples, mas eficiente introdução


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts