substring search not excluding extra characters

[ur]

I am trying to getan exact word match in searching a substring using function StringInStr.

Like my search word is oFSO sentence may contain oFSO or OFSO= and not case-sensitive.so I created conditional syntax as

$sentence is the complete sentence and $searchword contains the searching word.

If StringInStr($sentence, " "&$searchword&" ") or StringInStr($sentence, " "&$searchword&"=")

It is working fine for most cases and it excluding words like ofs,ofs1 ,etc words

But if the word is ofso1 (i.e., contains the word we specified + extra characters) then it is not excluding that.

Could you please help how to exclude that and write condition so that it will get exact match i.e, oFSO or ofso or OFSO (not case-sensitive).

 

Edited August 12, 2015 by ur

[topten]

Why StringInStr? What about regexp?

[Melba23]

ur,

Please do not double-post - I have deleted the other one.

M23

[ur]

Why StringInStr? What about regexp?

I didn't tried regexp. It is bit complicated and I felt SubInStr is easy to use and the $searchword is variable not fixed to particular word.

But anything is fine. Can you tell any solution for particular context.

Edited August 12, 2015 by ur

[ur]

Sorry, the above script is working fine the problem is not with the extra characters appended.

But in my script when I need to search for exact word.As a previous solution I used
StringInStr($sentence, " "&$searchword&" ")

But I need to include words even if the sentence used $searchword and appended the word with any special characters like (=,.,& etc) but exclude if any numbers or alphabets appended to it.

Ex:    sunday12 should be excluded but sunday= or sunday& should not be excluded.

Is there any regular expression we can use in SubInStr or any other function to get this solution.

[mikell]

$str = "oFSO oFSo= or mofso or oFSo& ofs,ofs1 ofso1 OFSO"
$s = "ofso"

$res = StringRegExpReplace($str, '(?i)\b' & $s & '\b[[:^alnum:]]?', "#")
msgbox(0,"", $res)

If StringRegExp($str, '(?i)\b' & $s & '\b') Then Msgbox(0,"", "match")

This expression matches any substring $s followed (or not) by a non-alphanumeric char

Edited August 12, 2015 by mikell
2nd regex fixed

[jchd]

mikell,

The part [[:^alnum:]]? is superfluous since if \b wouldn't be true if an alphanum was there after $s.

Also \b relies on the definition of \w and that includes the underscore, which may be something the OP doesn't want.

Edited August 12, 2015 by jchd

[mikell]

Right 
I placed it in the SRER to include it in the replacement, and forgot to remove it in the 2nd expression which tests the match only

[jchd]

In such case, a negative lookahead assertion is simpler and covers all bases, like $s & "(?![[:alnum:]]) but what to put inside the assertion depends on what the OP doesn't want.

Edited August 12, 2015 by jchd
Too much SQL or C implies using != too easily!

[ur]

"dfgfdg ofso" can we exclude if it is in double quotes.I mean if the string itself is having double quote characters and it is inside them.

Edited August 12, 2015 by ur

[ur]

Can yo explain this regular expression and can you provide any link where there is details about the pattern creation in regular expression.

[ur]

My task is I am looking for a particular set of words by reading it from a file.The complete file is loaded to a variable $strScript.

Now I am searching with the expression provided above 

$res = StringRegExpReplace($str, '(?i)\b' & $s & '\b[[:^alnum:]]?', "#")

But we need to exclude the word if it is in the double quotes.

Ex: I am searching for sunday.

And if the file contains 10 lines and if the word we found at line 8 then we also need to check whether the word is in a double quotes.
"One of the holiday is sunday for this week.".

If it is double quotes then we need to exclude that.

[jchd]

This should give you the idea:

$str = '"One of the holiday is sunday for this week." ... and today is not sunDay (but I love Sundays even if today is not sunday!)'
$s = "SuNDay"

ConsoleWrite($str & @LF)
$res = StringRegExpReplace($str, '".*?"', "")   ; removes anything inside pair of double quotes
ConsoleWrite($res & @LF)

$res = StringRegExpReplace($res, '(?i)\b' & $s & '(?![[:alnum:]])', '###')  ; replaces $s by ###
ConsoleWrite($res & @LF)

You can use this site to play with Perl (PCRE) regexp.

[ViciousXUSMC]

Nice site jchd, I guess there is no "find next" though?  couldn't find it.

I have been using Notepad++ it has regex option for searching but I like how this site helps tutor with the meaning of each part of your RegEx maybe this is what I needed to finally learn some of this stuff. 

[jchd]

I don't get the "find next" part. I don't know which regexp flavor Motepad++ uses and which precise possibilities it offers.