Re: bareword test on ebcdic.

[John W. Krahn]

Rajarshi Das wrote:

Hi,
Following is a snapshot of a bareword test :
--
use utf8;
my %hash = (те => 123);
is($hash{те}, $hash{'те'});
---
It runs on ascii and passes but fails on ebcdic (z/OS, ibm-1047) with 
perl-5.8.6.


The above two barewords (т and е) which make up the key of 
the hash, cannot be displayed on ebcdic.
What do I replace the above barewords (which correspond to 
'\xb8\x43\x43' and \xb8\x42\x64' in utf-ebcdic) with, on ebcdic ?


Can I  say %hash = ('\xb8\x43\x43'.'\xb8\x42\x64' => 123)  ? Or would 
this mean a string because of the single quotes and the concat operator ?


Is there some other way to represent the barewords above (other than 
printing the bareword characters themselves), so that the test works ?


Thanks in advance,
Rajarshi.


I see that you are also posting this on the mailing lists perl5-porters and 
perl-unicode so could you please remove further posts on this topic from the 
beginners list?  TIA.



John
--
use Perl;
program
fulfillment

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: bareword test on ebcdic.

[Rajarshi Das]

I posted it on all three lists assuming that the audience in all the three 
are different and higher the chances that someone posts a reply. Please let 
me know if this is an incorrect assumption, and also if this qn specifically 
is outside the scope of the beginners mailing list (or all ebcdic related 
qns are?)


Thanks,
Rajarshi.



From: "John W. Krahn" <[EMAIL PROTECTED]>
To: Rajarshi Das <[EMAIL PROTECTED]>,  Perl Beginners 


Subject: Re: bareword test on ebcdic.
Date: Wed, 15 Jun 2005 06:20:55 -0700

Rajarshi Das wrote:

Hi,
Following is a snapshot of a bareword test :
--
use utf8;
my %hash = (те => 123);
is($hash{те}, $hash{'те'});
---
It runs on ascii and passes but fails on ebcdic (z/OS, ibm-1047) with 
perl-5.8.6.


The above two barewords (т and е) which make up the key of the 
hash, cannot be displayed on ebcdic.
What do I replace the above barewords (which correspond to '\xb8\x43\x43' 
and \xb8\x42\x64' in utf-ebcdic) with, on ebcdic ?


Can I  say %hash = ('\xb8\x43\x43'.'\xb8\x42\x64' => 123)  ? Or would this 
mean a string because of the single quotes and the concat operator ?


Is there some other way to represent the barewords above (other than 
printing the bareword characters themselves), so that the test works ?


Thanks in advance,
Rajarshi.


I see that you are also posting this on the mailing lists perl5-porters and 
perl-unicode so could you please remove further posts on this topic from 
the beginners list?  TIA.



John
--
use Perl;
program
fulfillment


_
Test Your Memory and Win Amazing Prizes! 
http://adfarm.mediaplex.com/ad/ck/4686-26272-10936-429?ck=BrainTeaser DVD 
Players, Digicams & more!



--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>

Re: bareword test on ebcdic.

[John W. Krahn]

Rajarshi Das wrote:
I posted it on all three lists assuming that the audience in all the 
three are different and higher the chances that someone posts a reply. 
Please let me know if this is an incorrect assumption, and also if this 
qn specifically is outside the scope of the beginners mailing list (or 
all ebcdic related qns are?)


The combination of EBCDIC and unicode sounds a bit more complicated than would 
be covered on a beginners list however that is not up to me to decide.  You 
may get better help posting on comp.lang.perl.misc and/or 
comp.lang.perl.moderated on usenet or on perlmonks.com.



John
--
use Perl;
program
fulfillment

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]