Mahlzeit,
Müsste mit Regex funktionieren:
$text=~s/^(.{0,100}.*?)(\s.*)?$/$1/;
$text="~s/^(.{0,100}.*?)(\s.*)?$/$1/";
jetzt gibt er ~s/^(.{0,100}.*?)(\s.*)?$/$1/ das heraus.
Kein Wunder - was sollen die Anführungsstriche? Kleiner, aber feiner Unterschied ...
MfG,
EKKi
--
sh:( fo:| ch:? rl:( br:> n4:~ ie:% mo:} va:) de:] zu:) fl:{ ss:) ls:& js:|
sh:( fo:| ch:? rl:( br:> n4:~ ie:% mo:} va:) de:] zu:) fl:{ ss:) ls:& js:|