Zeilen aus txt auslesen/Verzeichnis prüfen/txt schreiben

[Thomas]

Hi,
also ich weiss wie der logische Ablauf sein muss nur fehlt mir als Anfänger die Befehle womit ich das realisieren kann...
Also erstmal mein momentaner Quellcode: (hab die manuellen EIngaben rausgenommen...
------------------------------------------------------------------
$pfad = <STDIN>; # Verzeichnis das durchsucht werden soll
chomp $pfad;
print "Verzeichnis: $pfad\n";

$name = <STDIN>; # Name der Datei nach der gesucht werden soll
chomp $name;
print "Suche nach...$name\n";

print "Wechsel zu Pfad ---> $pfad\nSearching..."; # Verzeichnis Wechsel
chomp($verz=$pfad);      # Verzeichnis Wechsel
chdir($verz);      # Verzeichnis Wechsel

$datei=$name; # Suche nach der Datei
if (-e $datei){
  print "\n\ngefunden!";
}
else {
  print "\n\nnicht gefunden!";
}
---------------------------------------------------------------------

Also ich brauche jetzt folgendes...
Am Annfang muss er erstmal eine txt Datei öffnen und davon eine Zeile auslesen ( TXT Datei: c:\winnt\system.ini
                            c:\winnt\arj.exe usw.... )
er soll also immer in das jeweilige Verzeichnis gehen und die Datei suchen, wenn sie vorhanden ist soll er in eine neue TXT reinschreiben "c:\winnt\system.ini    /    gefunden (oder halt nicht)
eigentlich ganz einfach aber es muss alles automatisch gehen und er soll nur immer eine zeile auslesen und dann die nächste...PLEASE HELP!!!

Vielen Dank schon im Voraus!