Posted to tcl by apn at Thu Nov 13 04:29:04 GMT 2014view raw

  1. (tcl) 56 % regexp -inline {(?:^|/CN=)[^/]+(?:/|$)} {/DC=local/DC=company/DC=corp/OU=systems/OU=win7/OU=Laptops/CN=PCNAME}
  2. /CN=PCNAME

Comments

Posted by apn at Thu Nov 13 04:34:46 GMT 2014 [text] [code]

(tcl) 62 % regexp {(/|^)CN=([^/]+)(/|$)} {/DC=local/DC=company/DC=corp/OU=systems/OU=win7/OU=Laptops/CN=PCNAME/FO=BAR} - - cb - 1 (tcl) 63 % puts $cb PCNAME