Warum verwendest Du nicht den Code, der Dir gepostet wird?

Basierend auf Deinem Code und Deiner Aussage, dass nur der Dateiname aufgezeigt wird, gehe ich davon aus, dass Du keinen Dateinamen übergibst und damit die Zeile die "girls_lpz.txt\n" if ! defined $filename; greift.