Birdman: Nur erste Zeile einlesen?

Beitrag lesen

Hallo,
wahrscheinlich das einfachste Problem (Perl) von allen, hab nur bisher keine Lösung gefunden.
Wie kann ich aus einer Textdatei mit mehreren Zeilen nur die erste Zeile einlesen (geht das auch mit "open") oder ausgeben (print)?

Die Datei ist nach dem Muster
wert1 | wert2 | wert3 |
wert1 | wert2 | wert3 |
wert1 | wert2 | wert3 |
etc. aufgebaut.

Ich möchte aber bei der html-Ausgabe mit print nur einmal z.B. wert3 ausgeben. An anderer Stelle verwende ich for bzw. foreach nach open, aber dann werden natürlich nacheinander die entsprechenden Werte jeder Zeile ausgegeben, ich brauche es aber nur einmal.

Danke, Birdman