Hi Charles, Charles K. Clarkson wrote on 29.04.2004:
>Jan Eden <[EMAIL PROTECTED]> wrote: > It may be an issue with your terminal software. Is >your terminal the place you expect to display results >of a script like this? Have you tried it under a >different terminal emulation? > > I tried a comparison test. I used this and always >received two equal strings. > >print "Same\n" if $string eq $string2; > > > When I got to the end of this reply I realized that >I was using ActiveState 5.8.3. perl582delta and >perldelta don't specify a change in core for unicode. >You might try looking at the ordinal values of both >strings. > >print ord $_ foreach split //, $string; >print "\n"; >print ord $_ foreach split //, $string2; > > If they are the same, capture the terminal output >and see if something has changed in the ordinal values >after they were sent to the terminal. Thanks for your suggestions. It turned out to be not a terminal, but an HTML::Entities issue: decode_entities returns an iso-8859-1 encoded string, and my terminal is set to expect utf-8. Now I'll use Unicode::String to get the converted string in UTF-8. - Jan -- Hanlon's Razor: Never attribute to malice that which can be adequately explained by stupidity. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
