What more info do we need? The error does not occur when removing whitespaces (cleanup), but on checking if $last involves a digit or if $last is unicode, whichever comes first (tried either version, i.e.):
I1: if($last=~/[^/x00-\x7f]){...#here the exception occurs} I2: if($last !~/\d/){... # here the exception occurs is I1 is commented out }
In reply to Re^2: unicode string comparison (perl 5.26)
by md351
in thread unicode string comparison (perl 5.26)
by md351
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |