Re^2: Help with regex - find captured pattern twice

in reply to Re: Help with regex - find captured pattern twice
in thread Help with regex - find captured pattern twice

Wow. What the heck is that monstrosity?! Well done.

Would you mind explaining that regex? I think that \pL references a unicode character class (from this page: http://perldoc.perl.org/perlrecharclass.html) but I'm still kind of baffled by what's going on...

Comment on Re^2: Help with regex - find captured pattern twice

Replies are listed 'Best First'.
Re^3: Help with regex - find captured pattern twice by hbm (Hermit) on Apr 12, 2013 at 03:11 UTC
You might read it as this: `s/ (?<! # 2. NOT preceded by \pL # a letter ) ( # 1. Capture \pL # a letter ) ( # 3. Capture \( # open paren; [\d+-]+ # one or more digits, plus, minus; \) # close paren )? # (Zero or one time) (?! # 4. NOT followed by \pL # a letter ) /(${1}SS*exp($1$2))/gx;` [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re^3: Help with regex - find captured pattern twice
by hbm (Hermit) on Apr 12, 2013 at 03:11 UTC

You might read it as this:

s/
  (?<!        # 2. NOT preceded by
     \pL      #    a letter
  )

  (           # 1. Capture
     \pL      #    a letter
  )

  (           # 3. Capture
     \(       #    open paren;
     [\d+-]+  #    one or more digits, plus, minus;
     \)       #    close paren
  )?          # (Zero or one time)

  (?!         # 4. NOT followed by
     \pL      #    a letter
  )

/(${1}SS*exp($1$2))/gx;
[download]

[reply]
[d/l]

In Section Seekers of Perl Wisdom