RosettaCodeData/Task/Regular-expressions/VBScript/regular-expressions.vbs
2026-04-30 12:34:36 -04:00

9 lines
225 B
Text

text = "I need more coffee!!!"
Set regex = New RegExp
regex.Global = True
regex.Pattern = "\s"
If regex.Test(text) Then
WScript.StdOut.Write regex.Replace(text,vbCrLf)
Else
WScript.StdOut.Write "No matching pattern"
End If