|
Posted by Scott Bryce on January 26, 2005, 2:26 pm
Please log in for more thread options
Neal wrote:
show/hide quoted text
> After installing NMS on a new server, having issues.
>
> Returning error:
>
> Invalid range "þƒ¿¿¿¾€-3" in transliteration operator at (/***.pl)
line
show/hide quoted text
> 573.
>
> Line 573 marked with <<< below:
>
> sub cleanup_realname {
> my ($realname) = @_;
>
> return '' unless defined $realname;
>
> $realname =~ s#s+# #g;
>
> if ($secure) {
> # Allow no unusual characters and impose a length limit. We
> # need to allow extended ASCII characters because they can
> # occur in non-English names.
> $realname =~ tr# a-zA-Z0-9_-,./'200-377##dc; <<<<<<<<<<<<<
> $realname = substr $realname, 0, 128;
> } else {
> # Be as generous as possible without opening any known or
> # strongly suspected relaying holes.
> $realname =~ tr#()#{}/#;
> }
>
> return $realname;
> }
>
> This fails even if I do not set realname in the form. Worked fine on the
> other server. Any ideas, or need for more info? (I need small words as
> I'm not very skilled in Perl.)
You dropped a backslash somewhere.
$realname =~ tr# a-zA-Z0-9_-,./'200-377##dc;
^
|
>
> Returning error:
>
> Invalid range "þƒ¿¿¿¾€-3" in transliteration operator at (/***.pl)