Hi, The following unicode folding test fails on EBCDIC (perl-5.8.6) : $a = '0178'; $b = '00FF';
$a1 = pack("U0U*", hex $code); $b1 = pack("U0U*", map { hex } split " ", $mapping); if (":$b1:" =~ /:[$a1]:/i) { print "ok\n"; } Alternately, if $a = '0178', and $b = '00DF', the test passes. Why is this so ? Is it because \xFF as a border case ( 1 less than 256) is not properly handled ? Does someone have any thoughts on the source of the problem ? Thanks in advance, Rajarshi. __________________________________ Yahoo! Mail - PC Magazine Editors' Choice 2005 http://mail.yahoo.com