utf8::encode my $strA_utf8 = $strA; utf8::encode my $strB_utf8 = $strB; $r->print($strA); $r->print($strB);