language Decoding problem..?

[vasanthgk91]

my $title_checking=$cgi->param("title_checking");

This $title_checking scalar variable via coming other language content

use HTML::Entities;

my $titlenamefromindex="ஸ்ரீசா&#xB
+A8;்த், சவான், &#xB9A
+;ண்டிலா ஆகி&#xB
+AF;ோர் தங்களத&#
+xBC1; குற்றங்கள
+ை ஒப்புக் க&#xB
+CA;ண்டதாக தகவ&#
+xBB2;்";

$titlenamefromindex=encode_entities($titlenamefromindex,"\200-\377");

This $titlenamefromindex variable via i got the original content

    if($title_checking eq $titlenamefromindex)
    {
    condition;
    }

I know that $title_checking param value and $titlenamefromindex value equal..But not executing Any mistake is there I did please give suggestion.

[farang]

I think you may want to first decode the HTML and then encode the string as UTF-8.

use strict;
use warnings;
use HTML::Entities;
use Encode 'encode';

my $titlenamefromindex=q{ஸ்ரீசா&#x
+BA8;்த், சவான், &#xB9
+A;ண்டிலா ஆகி&#x
+BAF;ோர் தங்களத&
+#xBC1; குற்றங்க&#xBB3
+;ை ஒப்புக் க&#x
+BCA;ண்டதாக தகவ&
+#xBB2;&#xBCD};

$titlenamefromindex = decode_entities($titlenamefromindex);
print encode('UTF-8', $titlenamefromindex ), "\n";

Output:
ஸ்ரீசாந்த், சவான், சண்டிலா ஆகியோர் தங்களது குற்றங்களை ஒப்புக் கொண்டதாக தகவல்

[vasanthgk91]

thank u

use HTML::Entities;
use Encode;

my $title_checking=$cgi->param("title_checking");

$title_checking=decode_entities($title_checking);
$title_checking=encode('UTF-8',$title_checking);

$title_checking=$prl->trim($title_checking);

print "$title_checking";

It's working...In my server I stored this format value then compare it's working..great thanks

[space_monk]

Are you definitely sure they are equal? One stray space or punctuation mark is all it would take for them to be different.

You should use modules such as Data::Dumper to find out, and perhaps reverse encode title_checking to see if you end up with the same entities.

[vasanthgk91]

In header section I used properly Meta content

    <meta http-equiv=\"content-type\" content=\"text/ html; charset=UT
+F-8\">

In form section also i used properly utf-8

    <form accept-charset=\"utf-8\"></form>

Next page param receiving

    my $title_checking=$cgi->param("title_checking");
    print "$title_checking";

ஸ்ரீசாந்த், சவான், சண்டிலா ஆகியோர் தங்களது குற்றங்களை ஒப்புக் கொண்டதாக தகவல் Like that i receiving

[space_monk]

I suggest just to be sure you walk along each character to find the difference. Something like this:

# there are probably better ways of doing a string diff...
my ($s1, $s2) = ($title_checking, $titlenamefromindex);

for (my $i = 0; i < length( $s1); $i++) {
   print "Different at $i\n" if (substr( $s1, $i, 1) ne substr( $s2, $
+i, 1);
}

(You may need to make minor fixes to above)

[moritz]

$titlenamefromindex=encode_entities($titlenamefromindex,"\200-\377");

The variable $titlenamefromindex is already entity-encoded, and now you're double-encoding it. Are you sure that's what you want?