develooper Front page | perl.perl5.porters | Postings from September 2005

'00FF' behaviour on z/OS

From:
rajarshi das
Date:
September 30, 2005 05:55
Subject:
'00FF' behaviour on z/OS
Message ID:
20050930125458.40440.qmail@web33714.mail.mud.yahoo.com
Hi,
If I run the following case folding test, 
$a = '0178';
$b = '00FF';

$a1 = pack("U0U*", hex $a);
$b1 = pack("U0U*", map { hex } split " ", $b);

if (":$b1:" =~ /:[$a1]:/i) {
print "ok\n";
}

it fails on z/OS (on perl-5.8.6).
However, if $b = '00DF', the test passes. 
Any thoughts on why this is happening ? Is there some behaviour specific to '00FF' that needs to be fixed ? 
 
Thanks in advance,
Rajarshi.

		
---------------------------------
Yahoo! for Good
 Click here to donate to the Hurricane Katrina relief effort. 


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About