Jetzt hab ich dann doch noch eine frage und ich komm einfach nicht drauf:
wie kann ich herausfinden ob in einer datei die letzte zeile eine leerzeile ist?
Verwendest du Tie:File
foreach(@array){
$_ eq '' and print 'leere Zeile';
}
bei normalem Zeilenweise durchlaufen
foreach(@array){
$_ eq "\n" and print 'leere Zeile';
}
Eine Zeile besteht normalerweise aus einem Linefeed, nicht aber bei Tie:File.
(Das setzt natürlich voraus dass der Zeilentrenner wirklich \n ist, und nicht umgestellt wurde.)
mfg Beat;