Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re^3: regex needed

by cheekuperl (Monk)
on Jul 12, 2012 at 11:29 UTC ( #981378=note: print w/replies, xml ) Need Help??


in reply to Re^2: regex needed
in thread regex needed

Check if this works:
my $line = '%TMP%\$$(DATE)_RE_IRD_Soc'; my $line2 = '%RESULTS%\$$(DATE_USA)' ; my $line3 = '%RESULTS%\$$(1110_DATE_USA)'; @lines=($line,$line2,$line3); foreach $elem (@lines) { if($elem=~m/.*\$\$(\(.*\))(.*)?/) { print "\nFirst: $1, Second: $2"; } }

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (5)
As of 2018-08-19 20:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Asked to put a square peg in a round hole, I would:









    Results (187 votes). Check out past polls.

    Notices?