1
mirror of https://github.com/jedisct1/libsodium.git synced 2024-12-25 13:05:08 -07:00
libsodium/msvc-scripts/rep.vbs

13 lines
294 B
Plaintext
Raw Normal View History

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