* On 01.05. Roland M. Kruggel (rk-liste@gmx.de) muttered: > ich habe eine Textdatei an deren Ende eine undefinierte Anzahl von > Leerzeilen ist. Ich möchte diese Leerzeilen alle löschen. #!/usr/bin/perl undef $/; $file = <STDIN>; $file =~ s/\n*$//g; print $file; HTH Til