Hm. Curiouser and curiouser. I haven't made any attempt to 'fix' it, because you (nor anyone) had demonstrated a problem with it. And you still haven't:
$s = '.' x 500;; $s =~ s[^.{1,400}\.\K.*?$][];; print length $s;; 401
I guess your system must be broken?
In reply to Re^5: Truncating after the last period
by BrowserUk
in thread Truncating after the last period
by sdyates
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |