First here is a code sample
# this is easy...
# grab a string
my $sa ='random,junk no,one,cares about(I,Want,This,stuff) but, (not,t
+his) stuff which&might have-random characters';
# extract the string between the first set of ( and )
my ($sb) = $sa =~ m/\((.+?)\)/;
# split the string on ,
my @ab = split(',',$sb);
# join and butress the string with ^
my $sc = '^' . join('^',@ab) . '^';
Obviously, I can do other things like use s/// instead of split and join to substitute , for ^. The key here is I wonder if it's possible to capture and split in one go during the match. Effectively not having the interim $sb and going straight to @sb
It seems like I should have the RegEx engine start matching between the first ( and ), but I can't get it to create groups inside the ()'s while ignoring the second ()'s.
Looking at the Perl Docs it seems like the answer is teasing me, but I just don't see it. Any suggestions?
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.