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