Re^4: How to avoid decoding string to utf-8.

in reply to Re^3: How to avoid decoding string to utf-8.
in thread How to avoid decoding string to utf-8.

Hi, haj, ikegami, Thank you for the reply.

I tried with the regex provided, unfortunately it does not seem working, and returning the same result.

Please note that, I am seeing this result on web application.

Below is what I have tried,

 my $utf8_decodable_regex =
       qr/[\xC0-\xDF][\x80-\xBF]    | # 2 bytes unicode char
       [\xE0-\xEF][\x80-\xBF]{2} | # 3 bytes unicode char
       [\xF0-\xFF][\x80-\xBF]{3}/x;


            $testStr=~ s/($utf8_decodable_regex)/decode('UTF-8',$1,Enc
+ode::FB_CROAK | Encode::LEAVE_SRC)/gex;
            #$testStr = decode('utf-8',$testStr) if $testStr=~/$utf8_d
+ecodable_regex/;
[download]

Any breakthrough would be appreciated, while I am trying to get around this issue.

Thank you for the efforts.

In Section Seekers of Perl Wisdom