Index: RPC-XML-0.60/lib/RPC/XML.pm =================================================================== --- RPC-XML-0.60.orig/lib/RPC/XML.pm +++ RPC-XML-0.60/lib/RPC/XML.pm @@ -969,7 +969,9 @@ sub as_string { my $self = shift; - '' . $self->SUPER::as_string . ''; + my $text = '' . $self->SUPER::as_string . ''; + utf8::downgrade($text) if(utf8::is_utf8($text)); + $text; } # Because of the slight diff above, length() has to be different from struct @@ -1249,6 +1251,7 @@ sub as_string ''; } $text .= ''; + utf8::downgrade($text) if(utf8::is_utf8($text)); $text; }