Holas.

Estoy empezando con perl, y, al intentar abrir y leer un archivo de texto
de 3 líneas, me salta la primera, leyendo tan solo las otras dos.

Este es el código:

my $curline;
my ***elements;

open( FILE, 'test.data' );
while( <FILE> ) {
chomp;
push( ***elements, $_ );
}
foreach $curline ( ***elements ) {
print "$curline\n";
}

Debería mostrar:
<linea 1>
<linea 2>
<linea 3>
pero solo muestra
<linea 2>
<linea 3>

¿ Que estoy haciendo mal ?

Gracias.