Re: opcode sequence.

[email protected] (rajarshi das)
Newsgroups perl.unicode,perl.mvs,perl.perl5.porters
Message-ID <[email protected]>

Dave Mitchell <[email protected]> wrote:
On Thu, Aug 18, 2005 at 11:19:16PM -0700, rajarshi das wrote:
> Hi,
> Here's a test on perl-5.8.6 run on z/OS :
> 
> $a = '0178';
> $b = '00FF';
> 
> $a1 = pack("U0U*", hex $a);
> $b1 = pack("U0U*", map { hex } split " ", $b);
> 
> if (":$b1:" =~ /:[$a1]:/i) {
> print "ok";

}
> 
> The test runs through the opcodes OP_REGCOMP, OP_MATCH and then gets
> into the opcode OP_COND_EXPR. 

Well, the test above should in fact give a syntax error, since that's not
a valid if syntax.
I have included the braces if that is what you meant.

Rajarshi. 

-- 
Britain, Britain, Britain! Discovered by Sir Henry Britain in
sixteen-oh-ten. Sold to Germany a year later for a pfennig and the promise
of a kiss. Destroyed in eighteen thirty-fourty two, and rebuilt a week
later by a man. This we know. Hello. But what of the people of Britain?
Who they? What do? And why? -- Little Britain



		
---------------------------------
 Start your day with Yahoo! - make it your home page
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.