[Creat0R]

Пытаюсь сделать функцию для массовой замены по тексту используя флаг “Whole word only” (только слово целиком) - Но всё что у меня получилось, так это замена нужного текста + тех символов которые считаются как разделителями между словами (Таб, пробел, перевод строки, возврат каретки, начало строки, и конец строки):

Код:

$Ret = _StringReplace_WholeWord(@TAB & "test" & @CRLF & "_test_" & @CRLF, "test", "000", 0)
ConsoleWrite($Ret) ;@TAB'а уже нету :(

Func _StringReplace_WholeWord($String, $WhatToFind, $Replace, $MatchCaseParam=0)
    Local $CaseSenceStr = '(?i)'
    If $MatchCaseParam = 1 Then $CaseSenceStr = ''

        Local $RetVal = StringRegExpReplace($String, $CaseSenceStr & GetRegExpPattern($WhatToFind), $Replace)
    Return SetExtended(@extended, $RetVal)
EndFunc

Func GetRegExpPattern($Var)
    Return '\t' & $Var & '\z|\A' & _
        $Var & '\t|\t' & $Var & '\t|\t' & $Var & '\s|\s' & _
        $Var & '\t|\A' & $Var & '\s|\s' & $Var & '\z|\s' & _
        $Var & '\s|\n' & $Var & '\s|\n' & $Var & '\t|\n' & _
        $Var & '\r|\n' & $Var & '\z|\A' & $Var & '\n|\A' & _
        $Var & '\r|\t' & $Var & '\n|\t' & $Var & '\r|\r' & _
        $Var & '\s|\r' & $Var & '\t|\r' & $Var & '\n|\r' & _
        $Var & '\z|\n' & $Var & '\r|\A' & $Var & '\z'
EndFunc

Как можно построить подобную функцию?