Sintaxis de Perl

La sintaxis general de Perl se puede resumir en:

• Las sentencias terminan en ;.
  print "Hola mundo";
• Los comentarios deben ir precedidos de #
  # Esto es un comentario
• Los tipos de datos son:
  Escalares: datos numéricos y cadenas de caracteres y comienzan por $.
  Arrays o arreglos: empiezan con @. Son cadenas de escalares de cualquier tipo. Los elementos ya no son arrays, por lo que al referenciar uno de ellos habrá que hacerlo como un escalar, y para encerrar el índice se utilizan corchetes [].
  Arrays asociativos, arreglos asociativos o hash: comienzan con el símbolo %. Son arrays en los que se guarda cada elemento precedido del índice que lo referencia. Los elementos son escalares, al igual que en los arrays, pero para recoger el índice se encierra entre llaves {}.

Aqui tienes un script de ejemplo:

#!/usr/bin/perl
$entero=14; # Número entero
$real=0.1234; # Número real
$cadena="Ejemplo de Script\n"; # Cadena de caracteres
print $cadena; # Imprime: Ejemplo de Script y un salto de línea

@notas=(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10); #array de enteros
@alumnos=("Segismundo", "Eustaquio", "Anastasia", "Bartolome"); # Array de cadenas de
                                                                                                      #caracteres
@array=("Mensaje", 14, 3.56, "Fin"); # Array de elementos distintos
# Para imprimir Segismundo y un un salto de linea, emplearíamos:
print $alumnos[0], "\n"; # Los arrays se indexan empezando por 0, como en C
# Como se imprime un solo elemento, se pone $ en vez de @

# Array asociativo. El primer elemento indexa al segundo, el tercero al cuarto ...
# Segismundo es el índice que corresponde a la nota 3, Anastasia al 8, etc
%finales=("Segismundo", 3, "Eustaquio", 7, "Anastasia", 8, "Bartolome", 4);
# Para imprimir la nota de Anastasia, escribiríamos
print $finales{"Anastasia"}; # Imprime 8
# Y si tenemos una variable:
$nombre=("Anastasia");
print $finales{$nombre}; # Tambien imprimiría 8

Las cadenas de caracteres se pueden encerrar entre comillas dobles ("..."), y los caracteres especiales que estén dentro de la cadena se interpretarán, o entre comillas simples ('...'), y los caracteres no se interpretarán.

print "Hola\n"; # imprime Hola y un salto de línea
print 'Hola\n'; # imprime Hola\n