Hallo,
Wie hast du die Datei geöffnet?
Du musst sie zum lesen und schreiben öffnen.
open(FHOUT,"+> $outFile" );
my $i=0;
while(<FHOUT>) {
$i++;
if ($i == 8){
print FHOUT "$k Paare gefunden!\n";
}
}
Das Output File ist nach dieser while Schleife leer!
Ich glaube ich muß was zu futtern holen
Gruß Sergej