Zeile einlesen

Moin !

Ich bin grad dabei ein bißchen Perl zu "lernen" (muss ne funktion schreiben)..

Doch hier hab ich n kleines Problem, ich les ne xml-Datei ein
die aus mehreren Absätzen besteht. Ein Absatz beinhaltet
etwa 4-5 Zeilen. In Zeile 1 steht der "Schlüssel" mit dem ich
den Absatz identifiziere. In Zeile 3 steht der Wert den ich benötige.

Ich überprüfe also jede Zeile nach dem Schlüsselwert, hab ich
diesen müsste ich praktisch zwei zeilen einlesen lassen und dann
weitermachen. Aber wie ?

Wie kann ich eine zeile einfach so einlesen ?
vermutlich is der befehl ganz simpel, aber ich komm net drauf..

*greetz*

hier mal kurz der code

#!C:/programme/perl/bin/perl.exe.
open (FILE, "datei.xml");
while(defined(my $i = <FILE>)) { 

	if( $i =~ /such_begriff/ ) {

                   #HIER SOLLN DANN DIE NÄCHSTEN 2 ZEILEN GELESEN WERDEN


	print $i 	
	}

}
close (FILE);