 |
| Fazer download da apostila em PDF |
Armazenando Informações em Perl
Quando você seleciona um trecho de um texto em algum editor, você pode colar ele depois quantas vezes quiser. Se o editor ficar ligado 10 anos, você ainda pode colar depois de 10 anos.Quando você joga um game e perde, ao voltar, você volta pra mesma fase, com o mesmo nível e itens que coletou.
Quando você ouve uma música no celular, para de ouvir, e depois volta a ouvir (não importa quanto tempo depois), você volta no mesmo exato ponto de antes.
E aí, o editor adivinha o que você copiou? O aplicativo de música adivinha que música e onde você parou de ouvir? Óbvio que não, se eles sabem dessas informações é porque elas foram armazenadas, foram salvas, guardadas em algum lugar.
Armazenamento e uso de informações salvas são um dos pilares da programação, e vamos aprender agora, em programação Perl, como armazenar informações para usar no decorrer de nossos scripts.
Futuramente vamos aprender como armazenar valores em arquivos de texto, por exemplo.
Assim, você salva informações que ficarão permanentemente gravadas em sua máquina, mesmo após o término da execução do seu script.
Variável em Perl: como declarar e inicializar
Vamos primeiro aprender a armazenar informações de maneira temporária, ou seja, durante a duração da execução de nossos scripts em Perl, e somente informações do tipo 'escalares' (vamos estudar outros tipos de informações posteriormente, como Hashes e Arrays).Essa armazenagem de informações é por meio das variáveis.
Variável nada mais é do que isso: um troço que armazena dados.
Toda variável do tipo escalar (como números e strings), tem um nome e começa pelo símbolo $ (vigil). Diferente de outras linguagens, no Perl você não precisa declarar previamente as variáveis, pode ir logo usando elas, sem perda de tempo, e nem precisa dizer que tipo de informação quer armazenar.
Por exemplo, vamos armazenar o número 2112 na variável de nome numero:
- $numero = 2112;
Pronto, só isso. O símbolo $, um nome, o operador de atribuição (=) e a informação que você desejar armazenar inicialmente.
Mas qual a utilidade disso? Qual o propósito de se usar variáveis em Perl?
Let's descobrir.
Variáveis: Para que servem ?
Quando declaramos uma variável, o Perl vai lá e reserva um bloco na memória do seu computador.Por exemplo, ele pode reservar o bloco de número: 0x34671FF
Mas poxa, programação é pra ser fácil e simples...ficar usando esse troço de número feio não dá, concorda? E se ao invés de chamarmos 0x34671FF pudéssemos chamar por um nome mais fácil, que a gente escolhe?
Que tal chamar de $numero ?
Toda vez que usarmos a variável $numero, o Perl entende que você tá se referindo ao valor armazenado na posição 0x34671FF da sua memória.
Variável em Perl: Como usar
Declare e inicialize uma variável de nome idade com o valor de sua idade.Por exemplo:
- $idade = 20;
Agora vamos fazer um script que imprime na tela o texto: "Você tem [sua idade] anos de idade".
Em Perl, ele fica assim:
#!/usr/bin/perl $idade=20; print "Você tem $idade anos de idade\n";Veja que o não saiu "$idade" na tela, e sim um número.
Ou seja, o Perl interpretou, ele pensa assim:
- "Opa! Aqui tem um troço começando com o símbolo $, então é uma variável...ao invés de imprimir o nome da variável, vou imprimir o valor que ela armazena...deixa eu buscar aqui o que tem lá nesse endereço de memória".
E pimba, ele imprime o número que você armazenou inicialmente na variável:
Estamos interpolando strings e variáveis, podemos fazer isso usando o operador de concatenação também:
#!/usr/bin/perl $age=20; print "Sua idade é: ".$age."\n";Note que não precisamos colocar as aspas entre o nome da variável.
Agora vamos armazenar uma string dentro de uma variável.
Coloque seu nome na variável $name, por exemplo:
$name = 'Neil Peart';
Agora um script que te dá bom dia:
#!/usr/bin/perl $name = 'Neil Peart'; print "Bom dia, $name\n";Podemos fazer assim também:
#!/usr/bin/perl $name = 'Neil Peart'; print "Bom dia, ", $name;E até assim:
#!/usr/bin/perl $name = 'Bom dia, Neil Peart'; print $name;Esse Perl é realmente muito flexível, não acha?
Exercícios de variáveis em Perl
"Escreva um script que tem uma variável que armazena um valor numérico qualquer, e exiba o dobro dele."Vamos armazenar o número 2112 na variável $num.
Na variável $doub, armazenamos o dobro da $num (basta multiplicar essa por dois).
Veja como fica nosso script:
#!/usr/bin/perl $num = 2112; $doub = 2 * $num; print "O dobro de ", $num, " é ", $doub;"Faça um script que armazena os números 21 e 12 em duas variáveis diferentes e exiba a soma deles"
Vamos armazenar nas variáveis $num1 e $num2, cada valor.
Na variável $soma vamos armazenar a soma ($num1+$num2), veja:
#!/usr/bin/perl $num1 = 21; $num2 = 12; $soma = $num1 + $num2; print "Soma: $soma";Você também podia fazer diretamente no print:
#!/usr/bin/perl $num1 = 21; $num2 = 12; print "Soma: ", ($num1+$num2);A maneira acima é mais eficiente, pois ela declara apenas duas variáveis.
Podemos também usar só uma variável, inicializando já com a soma diretamente:
#!/usr/bin/perl $num = 21+12; print "Soma: $num";Entende agora porque o lema do Perl é "sempre tem várias maneiras de fazer a mesma coisa" ?
"Escreva um script que inicializa com duas variáveis com dois valores. Em seguida, mostre a soma, subtração, multiplicação, divisão e resto da divisão do primeiro pelo segundo número."
Essa deixamos com vocês, escreva seu script nos comentários.
