2011-11-14T09:03:38 Dubu

Oh, dann doch schon lieber

Code (perl): (dl )

while (chomp) {}

;-)

Habe eben mal in perldoc -f chomp nachgelesen. Dort findet sich

Quote

When in paragraph mode ("$/ = """), it removes all
trailing newlines from the string.

Vielleicht ist es das, was der OP sucht.