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