Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: brackets matching problem

by PodMaster (Abbot)
on Aug 19, 2004 at 08:22 UTC ( [id://384207]=note: print w/replies, xml ) Need Help??


in reply to brackets matching problem

Try
$_ = '123'; if(/(1|12)(2?)/) { print "1=[$1] 2=[$2]\n"; } if(/(12|1)(2?)/) { print "1=[$1] 2=[$2]\n"; }
and compare (left to right).

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://384207]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others having a coffee break in the Monastery: (2)
As of 2025-03-18 04:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    When you first encountered Perl, which feature amazed you the most?










    Results (56 votes). Check out past polls.