On Thursday 27 May 2021 23:35:32 Bruce Johnson wrote: > use bytes; $string=substr($orig,0,4000);
Hello! This is really suspicious. See **BOLD** description of 'bytes' module: **Use of this module for anything other than debugging purposes is strongly discouraged.** **If you feel that the functions here within might be useful for your application, this possibly indicates a mismatch between your mental model of Perl Unicode and the current reality.**