Jörk Behrends: Umbrüche in Formular umsetzen

Beitrag lesen

Hallo,

auf meiner Website kann man in einem Formular Daten eingeben,
die dann per Email (Perl Skript) verschickt werden. Ich will das
nach so-und-so-vielen Zeichen Umbrüche eingebaut werden.
Mit wrap="physical" bin ich leider nicht fündig geworden.

Hi Oliver!

Probier's doch mal mit

$text =~ s/(.{0,10}\w)\s/$1\n/g;

Die 10 steht hier für so-und-so-viele Zeichen minus 1. Der Text würde also umgewandelt
werden, in einen Text mit höchstens 11 Zeichen pro Zeile. Es sein denn es gibt dort ein
Wort, welches länger ist als 11 Zeichen:

123 123456789012345 123 12345 1234

wird zu

123
123456789012345
123 12345
1234

Möchtest Du, daß mehrere Leerzeichen durch einen Zeilenumbruch ersetzt werden, so ersetzte
\s durch \s+

123 12345  1234

wird dann zu

123 12345
1234

anstelle von
123 12345
1234

Viel Spaß damit,
   Jörk