Errores al abrir un fichero

La típica frase Perl para abrir un fichero es:

open FILE, ">>logfile" or die "No se puede crear el fichero: $!";

Esta expresión aprovecha la evaluación en circuito corto. La función die imprime el mensaje a STDERR y hace que nuestro programa termine con un estatus distinto de cero. Además añade al mensaje el nombre del programa y el número de línea en caso de que el mensaje de error no termine en un retorno de carro (\n). La variable especial $! contiene el último mensaje de error del sistema operativo.