Programação em PERL - Introdução

Hello pessoal,

São exatamnete 3:30 da manha e eu naum tenho nada pra fazer entaum resolvi fazer um tutorial sobre perl, pois é muito dificil achar material em português sobre essa linguagem na internet.

Então como é "padrão", vamos começa com uma breve introdução ao perl...

Vou tentar em varios mini tutoriais, mostrar desde a simplicidade à funções mais complexas em perl..


Introdução:

Perl é uma linguagem que atualmente naum é muito usada, pois foi sendo substituida por linguagens com mais interatividade, porém ela é ainda usada em servidores e por curiosos devido a seu baixo uso de memoria e alta performace em programas estruturados...

Ela é uma linguagem multiplataforma e funciona independentemente do sistema, porém por ser uma lingaugem interpretada necessita de um "interperetador" ( que conclusão heim?! ), em sistemas linux o interpretador ja vem como padrão no sistema, ja no windows vc devera instalar o activeperl ( o que eu recomendo, porém tem outros).

É uma linguagem que pode ser usada para desktop ou web, dependendo de sua criatividade..

Eu naum sou muito bom em ficar enrolando na introdução naum, entaum vamos logo direto ao assunto.

O inicio de um programa em perl, é sempre indicando ao interpretador a linguagem que esta sendo usada:

#!/usr/bin/perl


Para imprimir os resultados ne tela utiliza-se do comando print, entaum vamos começar com o inesquecivel ola mundo:
EX:

#!/usr/bin/perl

print "ola Mundo";


* OBSERVE: A terminação de uma linha de comando é dado pelo caracter ";", ou seja sempre quando terminar de execurar algum comando dar-se-a necessidade de usar ";".


Os comentarios são feitos utilizando de #.
EX:

#!/usr/bin/perl

print "ola mundo de novo"; # Isso é um comentario


A declaração de variaveis em perl naum é necessaria para o programa, porém para uma boa logica e para diminuir os erros do seu programa é sempre bom declarar as variaveis, a declaração de variaveis em perl é feita a partir com comando "my".
EX:

#!/usr/bin/perl

my $variavel;


* OBSERVE: Em perl diferentemente de outras linguagens como c, pascal, naum é necessaria

especificar o conteudo que esta sera usado na variavel.
EX:

#!/usr/bin/perl

my $variavel;

$variavel = "Frescuras do perl";

print "$variavel\n";


Este mesmo exemplo pode ser feito:
EX:

#!/usr/bin/perl

my $variavel = "frescuras do perl";

print $variavel;


A declaração de uma varivel em perl deve ser feita somente uma vez, naum sendo necessaria a repetição da declaração.


Variaveis

No perl existem 3 tipos de variaveis: scalar, array e hash.

Scalar - A variavel scalar é composta por um $ e é utilizada para guardar valores simplês.
EX:

#!/usr/bin/perl

my $numero = 25;
my $texto = " vinte e cinco";

print " o valor é $numero e por extenso é $texto\n";


Arrays - Essas variaveis são representadas pelo simbolo @ é usado para guardar uma lista de valores...
EX 1:

#!/usr/bin/perl

my @cores = ("Azul", "Amarelo", "Branco");

my @compras = ("Feijão", "Arroz", "leite");


EX 2:

#!/usr/bin/perl

my @despesas = (250, 500, 25);


EX 3:

#!/usr/bin/perl

my @dicas = ("casa", 23, "camelo", 58);


EX 4:

#!/usr/bin/perl

my @dicas;
dicas[0] = "casa";
dicas[1] = 23;
dicas[2] = "camelo";
dicas[3] = 58;


Para acessar os elementos de uma array vc utiliza-se de um indice que determina a localização do array:
EX:

#!/usr/bin/perl

my dicas ("casa", 23, "camelo", 58);

print "dicas[0]\n";

# Vai Imprimir casa

print dicas[2];

# vai imprimir camelo


Hash - São variaveis usadas para quardar uma lista de valores, tem a mesma função de um array, porém para acessar elementos de um arra vc utiiza-se somente de numeros, com o hash vc pode utilizar-se de textos.

A declaração de hash é feita atraves de %.
EX 1:

#!/usr/bin/perl

my %enderecos = ();

$enderecos{joao} = "Brasilia";
$enderecos{Maria} = "Sao Paulo";

print " Joao mora em $enderecos{joao}, e Maria mora em $enderecos{Maria}";


Também pode ser feita associando a o primeiro elemento da lista sendo a chamada para segundo elemento como no exemplo.
EX 2:

#!/usr/bin/perl

my %enderecos = ("Joao", "Brasilia", "Maria", "Sao Paulo");

print " Joao mora em $enderecos{'joao'}, e Maria mora em $enderecos{'Maria'}";

* OBSERVE: Observa-se que a chamada agora naum será mais feita somente por $enderecos{joao} e sera colocada a string de acesso entre '' ( aspas simplês)
Ficando assim $enderecos{'joao'}..

Agora vamos a fazer um exemplo de diversas formas de usar variaveis em perl... ;)
EX:

#!/usr/bin/perl

my $escalar = "Ola mundo";

my @array = ("Bom", "Dia", "New", "World");

my %hash = ("nome", "joana", "sobrenome", "da Silva");

print "$escalar\n";

print "$array[0] $array[1] $array[2] $array[3]\n";

print "$hash{'nome'} $hash{'sobrenome'}\n";


Por enquanto é só estarei postando novos conteudos em breve...