in reply to Re: Re: Alternation in Effective Perl Programming Example
in thread Alternation in Effective Perl Programming Example
And, to the original question: I think the idea is to 'inch along'
will return the pieces ending w/ an escaped non-word char, a single char or the comment begin/end markers. Hmm, an escaped non-word char or a single char in quotes? No, as many \\\w|. as found between quotes. I guess so:for (split m!("(?:\\\W|.)*?"|/\*|\*/)!) {
won't start $in_comment too early.biff = "not a comment /*"; /* marker for not a comment */
a
|
---|
In Section
Seekers of Perl Wisdom