blob: 3611f6ca65eb92fd50c6d751e66ea4b016a93023 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
Dim pat, patparts, rxp, inp
pat = WScript.Arguments(0)
patparts = Split(pat, "/")
Set rxp = new RegExp
rxp.Global = True
rxp.Multiline = False
rxp.Pattern = patparts(1)
Do While Not WScript.StdIn.AtEndOfStream
inp = WScript.StdIn.ReadLine()
WScript.Echo rxp.Replace(inp, patparts(2))
Loop
|
