如何在ahk中更改以特定字母开头的每个单词？

#NoEnv
SetBatchLines -1

text := "This is a sample text"
changedText := ""

Loop, Parse, text, %A_Space%
{
    word := A_LoopField
    if (SubStr(word, 1, 1) = "s") ; 更改以字母"s"开头的单词
    {
        changedWord := "new" . SubStr(word, 2)
        changedText .= changedWord . " "
    }
    else
    {
        changedText .= word . " "
    }
}

changedText := Trim(changedText) ; 去除首尾空格
MsgBox % changedText