perl skript.pl dateiname.txt