Começando com Perl
- Use seu editor favorito para criar um arquivo chamado
hello
. - Configuração do arquivo
hello
: O arquivo assume que seu interpretador Perl,perl
, está localizado no diretório/usr/bin
. - Opção
-w
: O uso da opção-w
(também chamada de switch) instrui o Perl a produzir mensagens extras de aviso sobre construções potencialmente perigosas. - Finalização das declarações: Em Perl, as declarações terminam com um ponto e vírgula (
;
). - Tornar o arquivo executável: No terminal, torne o arquivo executável digitando o seguinte comando:
chmod +x hello
- Executar o script: Execute o script digitando
./hello
no terminal. Se o diretório atual não estiver no seu PATH, certifique-se de especificar o caminho completo para o script.
./hello
- Em sistemas sem suporte para #! (como Windows): Digite o seguinte comando para executar o script Perl:
perl -w hello
Seguindo esses passos, você estará pronto para começar a programar em Perl e explorar suas funcionalidades poderosas para automação, processamento de texto e muito mais.
Variáveis
- Variáveis Escalares: Um lugar em Perl que armazena um valor é uma variável escalar.
- Variáveis Escalares: As variáveis escalares começam com um
$
, seguido por uma letra e possivelmente mais letras, dígitos ou sublinhados. - Diferenciação entre Maiúsculas e Minúsculas: Letras maiúsculas e minúsculas são distintas.
- Exemplo de Variável Escalar: Por exemplo,
$nome
é um nome de variável escalar válido. - Comentários:
#
indica o início de um comentário que continua até o final da linha.
Aqui está o exemplo em Perl para criar um script de saudação chamado greet
:
#!/usr/bin/perl -w
print "Qual é o seu nome? ";
$nome = <STDIN>;
chomp ($nome);
print "Olá, $nome\n";
# lê o nome do STDIN
# remove o último caractere (\n)
Para tornar o script executável, use o comando:
chmod +x greet
E para executar o script, digite:
./greet
Ou, se o diretório atual não estiver no seu PATH:
perl greet
Seguindo esses passos, você estará pronto para começar a explorar Perl e suas funcionalidades poderosas para automação, processamento de texto e muito mais.
Declarações
- Declarações if: Perl utiliza declarações if semelhantes ao C.
- Uso de Chaves: Ao contrário de C, Perl requer um par de chaves para indicar que a declaração pertence a uma instrução if.
- Blocos em if e else: Perl requer um bloco ({ ... }) após if e else:
Aqui está um exemplo de código Perl que usa if e else:
#!/usr/bin/perl -w
print "Qual é o seu nome? ";
$nome = <STDIN>;
chomp($nome);
if ($nome eq "Tondo") {
print "Olá Dr. T! Como vai você?\n";
} else {
print "Olá, $nome\n";
}
# lê o nome do STDIN
# remove o último caractere (\n)
O operador eq
compara duas strings e retorna verdadeiro se forem iguais.
Após escrever o código, para torná-lo executável, siga os passos mencionados anteriormente.
Codigo: Adivinhando uma Palavra em Perl
- Comparações em Perl: Perl suporta diversas comparações:
- Igual:
==
(numérico) eeq
(string) - Diferente:
!=
(numérico) ene
(string) - Menor que:
<
- Menor ou igual a:
<=
- Maior que:
>
- Maior ou igual a:
>=
- Iteração em Perl: Uma forma de iteração em Perl é utilizando a declaração
while
: while ( ... ) { statements }
- A declaração
while
usa uma expressão entre parênteses; se a expressão avaliar para algo que não seja zero nem uma string vazia ("") é considerada verdadeira e a execução dos comandos no loop continua. - Variáveis escalares em Perl: Variáveis escalares sempre começam com
$
e podem conter valores numéricos ou strings em diferentes momentos.
Aqui está um exemplo prático de um jogo simples de adivinhar uma palavra em Perl:
#!/usr/bin/perl -w
$palavra_secreta = "aviao";
print "Qual é o seu nome? ";
$nome = ;
chomp($nome);
if ($nome eq "Tondo") {
print "Olá Dr. T! Bom ouvir você.\n";
} else {
print "Olá, $nome\n";
}
print "Qual é a palavra secreta? ";
chomp($palpite = );
while ($palpite ne $palavra_secreta) {
print "Errado, tente novamente.\n";
print "Qual é a palavra secreta? ";
chomp($palpite = );
}
print "Parabéns, você acertou!\n";
Neste exemplo, o operador eq
é usado para comparar se o palpite do usuário é igual à palavra secreta "aviao"
.
Ao seguir estes passos, você pode experimentar e explorar o poder da linguagem Perl para lógica de comparação e iteração.
Post a Comment