in reply to Re^2: MultiByte Char handling in perl
in thread MultiByte Char handling in perl

Here is an example of whats happening. 

print "charEncoding string val = " . $enc->($val) . "\n\n";
#prints charEncoding string val = 歡迎來到&#38
+597;虎!

  my $encoded = $enc->($val);
  print "\n charEncodingo $encoded == $val " ;
#prints charEncodingo 歡迎來到雅è™&
+#142;! == 歡迎來到雅虎!

[download]
Can someone throw some light here. Please don't look at syntax errors.

In Section Seekers of Perl Wisdom