En esta sección, aprenderemos sobre la sintaxis y la estructura básica de los programas en Perl. Este conocimiento es fundamental para escribir y entender cualquier script en Perl.

  1. Comentarios

Los comentarios en Perl se utilizan para explicar el código y se ignoran durante la ejecución. Se inician con el símbolo #.

# Este es un comentario en Perl
print "Hola, Mundo!\n"; # Esto imprime un mensaje en la pantalla

  1. Declaración de Variables

Perl tiene tres tipos principales de variables: escalares, arreglos y hashes.

Escalares

Las variables escalares almacenan un solo valor (número, cadena, referencia, etc.) y se denotan con el símbolo $.

my $nombre = "Juan";
my $edad = 25;
my $pi = 3.14159;

Arreglos

Los arreglos almacenan listas ordenadas de valores y se denotan con el símbolo @.

my @nombres = ("Ana", "Luis", "Carlos");
my @numeros = (1, 2, 3, 4, 5);

Hashes

Los hashes almacenan pares clave-valor y se denotan con el símbolo %.

my %telefono = (
    "Juan" => "123-4567",
    "Ana" => "987-6543",
    "Luis" => "555-1212"
);

  1. Operadores

Perl soporta una variedad de operadores para realizar operaciones aritméticas, de comparación y lógicas.

Operadores Aritméticos

Operador Descripción
+ Suma
- Resta
* Multiplicación
/ División
% Módulo (resto)
** Exponenciación

Operadores de Comparación

Operador Descripción
== Igual a
!= Diferente de
< Menor que
> Mayor que
<= Menor o igual que
>= Mayor o igual que

Operadores Lógicos

Operador Descripción
&& Y lógico (AND)
`
! Negación lógica

  1. Estructuras de Control

Condicionales

Las estructuras condicionales permiten ejecutar código basado en condiciones.

if y else

my $edad = 20;

if ($edad >= 18) {
    print "Eres mayor de edad.\n";
} else {
    print "Eres menor de edad.\n";
}

elsif

my $nota = 85;

if ($nota >= 90) {
    print "Excelente.\n";
} elsif ($nota >= 75) {
    print "Bueno.\n";
} else {
    print "Necesitas mejorar.\n";
}

Bucles

Los bucles permiten ejecutar un bloque de código repetidamente.

while

my $contador = 0;

while ($contador < 5) {
    print "Contador: $contador\n";
    $contador++;
}

for

for (my $i = 0; $i < 5; $i++) {
    print "Iteración: $i\n";
}

foreach

my @nombres = ("Ana", "Luis", "Carlos");

foreach my $nombre (@nombres) {
    print "Nombre: $nombre\n";
}

  1. Subrutinas

Las subrutinas son bloques de código que pueden ser llamados repetidamente desde diferentes partes del programa.

sub saludar {
    my ($nombre) = @_;
    print "Hola, $nombre!\n";
}

saludar("Juan");
saludar("Ana");

Ejercicio Práctico

Ejercicio 1

Escribe un programa en Perl que:

  1. Declare una variable escalar con tu nombre.
  2. Declare un arreglo con tres de tus hobbies.
  3. Declare un hash con tres pares clave-valor que representen tus amigos y sus números de teléfono.
  4. Imprima un mensaje de saludo usando la variable escalar.
  5. Use un bucle foreach para imprimir cada uno de tus hobbies.
  6. Use un bucle while para imprimir cada par clave-valor del hash.

Solución

# Declaración de variables
my $nombre = "Juan";
my @hobbies = ("Leer", "Correr", "Programar");
my %amigos = (
    "Ana" => "123-4567",
    "Luis" => "987-6543",
    "Carlos" => "555-1212"
);

# Imprimir mensaje de saludo
print "Hola, $nombre!\n";

# Imprimir hobbies
foreach my $hobby (@hobbies) {
    print "Hobby: $hobby\n";
}

# Imprimir amigos y sus números de teléfono
my @claves = keys %amigos;
my $i = 0;

while ($i < @claves) {
    my $amigo = $claves[$i];
    print "Amigo: $amigo, Teléfono: $amigos{$amigo}\n";
    $i++;
}

Conclusión

En esta sección, hemos cubierto la sintaxis y la estructura básica de Perl, incluyendo comentarios, variables, operadores, estructuras de control y subrutinas. Estos conceptos son fundamentales para cualquier programador que desee escribir scripts en Perl. En el próximo módulo, profundizaremos en la programación básica en Perl, explorando más a fondo las variables y los tipos de datos.

© Copyright 2024. Todos los derechos reservados