Regular expression

[ur]

How to use regular expressions in StringSplit and StringInStr

[jchd]

You can't. Use StringRegExp (see help there for pattern grammar) and/or StringRegExpReplace.

[ur]

I want to check whether the particular word exists in a file and not surrounded by any double quotes.

Ex: 

b = "sunday is only holiday"

 

Here the word we are searching is only but it should return false as the word is in double quotes.

 

Can you please help me on this.

 

[jchd]

Please stick to the first topic.

[Malkey]

How to use regular expressions in StringSplit and StringInStr

Here is an example of using a  regular expression in conjunction with StringInStr.

Local $b = 'She said,"Sunday is only holiday". Once a week only.'
Local $sSearchWord = "only"

MsgBox(0, "Result", 'The word "' & $sSearchWord & '" is ' & _
        ((StringInStr(StringRegExpReplace($b, "(['""])[^\1]*\1", ""), $sSearchWord)) ? ("") : ("not")) & _ ; Ternary selection of "" or "not".
        ' present outside of quotes.')

Edit: Replaced RE pattern, "(['""])[^\1]*\1", with this one, "(['""]).*?\1",

Edited August 14, 2015 by Malkey
See Mikell post #9

[kylomas]

@‌Malkey - Thanks for the lesson in using group references. I understand it now that I've seen it in use.  I changed the ^\1 class to non-greedy to handle the case of unmatched quotes...

;Local $b = 'She said,"Sunday is only holiday". Once a week only.'
Local $b = 'She said,"Sunday is only holiday". Once a week only.  But watch out for orphan "" or '' marks.'
Local $sSearchWord = "only"

MsgBox(0, "Result", 'The word "' & $sSearchWord & '" is ' & _
        ((StringInStr(StringRegExpReplace($b, "(['""])[^\1]*?\1", ""), $sSearchWord)) ? ("") : ("not")) & _ ; Ternary selection of "" or "not".
        ' present outside of quotes.')

kylomas

[ur]

Local $b = 'She said,"Sunday is only holiday". Once a week only1.  But watch out for orphan "" or '' marks.'
Local $sSearchWord = "only"

MsgBox(0, "Result", 'The word "' & $sSearchWord & '" is ' & _
        ((StringInStr(StringRegExpReplace($b, "(['""])[^\1]*?\1", ""), $sSearchWord)) ? ("") : ("not")) & _ ; Ternary selection of "" or "not".
        ' present outside of quotes.')

 

The result is different here.It is matching the word only1 also for only.

[ur]

@‌Malkey - Thanks for the lesson in using group references. I understand it now that I've seen it in use.  I changed the ^\1 class to non-greedy to handle the case of unmatched quotes...

;Local $b = 'She said,"Sunday is only holiday". Once a week only.'
Local $b = 'She said,"Sunday is only holiday". Once a week only.  But watch out for orphan "" or '' marks.'
Local $sSearchWord = "only"

MsgBox(0, "Result", 'The word "' & $sSearchWord & '" is ' & _
        ((StringInStr(StringRegExpReplace($b, "(['""])[^\1]*?\1", ""), $sSearchWord)) ? ("") : ("not")) & _ ; Ternary selection of "" or "not".
        ' present outside of quotes.')

kylomas

Thanks Malkey,Kylomas  and everyone who posted the reply for using regular expression in StringInStr.
I got regular expression for StringSplit also by Melba23

https://www.autoitscript.com/forum/topic/129697-split-string-by-regular-expression/

[mikell]

@Malkey
You can't use a backreference inside a character class

$str = ' aac "bbb" 111 "aac" '

$res = StringRegExpReplace($str, "(['""])([^\1]*)\1", "###")
MsgBox(0, "ex1", $res)

Edit
"Backreferences, too, cannot be used inside a character class. The \1 in a regex like (a)[\1b] is either an error or a needlessly escaped literal 1"  (Jan Goyvaerts)

Edited August 13, 2015 by mikell

[Malkey]

@mikell

Thanks for the heads up.

From my observations (of a backreference in a "not character" class, "[^\1]"),  there appears to be no visible error generated, and, the unnecessary escaped literal "1" is not acting as a "1".   It is acting more like a dot, "." - matching any character.   This explains why the added lazy qualifier, " [^\1]*?",  works like, ".*?".
It appears a backreference cannot be used inside a character class because is not supported at this time.