mirror of
https://github.com/jedisct1/libsodium.git
synced 2024-12-28 22:21:15 -07:00
13 lines
294 B
Plaintext
13 lines
294 B
Plaintext
|
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
|
||
|
|