Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: Regular expression query

by Samy_rio (Vicar)
on Jul 30, 2007 at 06:43 UTC ( #629491=note: print w/replies, xml ) Need Help??

in reply to Regular expression query

Hi isha, I am not clear with your question. The problem may be in variable name $t1, which should be $t and inside character class range should be [A-Z], since you are using underscore seprately in the character class.

if($t1 !~ /A_[A_Z0-9_]+/i) it should be if($t !~ /A_[A-Z0-9_]+/i) Output: ------- $CD = 'A_TAG_HSSL_LBA_1'; #matches $CD = 'A_TAG_HSSL_LBAB_1'; #not matches

Also look into this How do I post a question effectively?

Velusamy R.

eval"print uc\"\\c$_\""for split'','j)@,/6%@0%2,`e@3!-9v2)/@|6%,53!-9@2~j';

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://629491]
Discipulus yaaawn..
[Corion]: DST does that to everybody...
Corion attempts to find who to address to better target his drive-by patches
[Corion]: This time it's for the Duktape embedded Javascript engine, which would be nice to have IMO, but doesn't compile on Windows currently
[Corion]: I imagine it would be fun to have WWW::Mechanize:: Duktape, but I haven't seen a web browser written in Javascript yet, except the ones distributed with PhantomJs

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (12)
As of 2017-03-27 11:03 GMT
Find Nodes?
    Voting Booth?
    Should Pluto Get Its Planethood Back?

    Results (319 votes). Check out past polls.