Возвращает совпадение регулярных выражений vbscript на многостроках

Question

Я использую регулярное выражение vbscript для поиска самоопределяемых тегов внутри файла.

"\[\$[\s,\S]*\$\]"

К сожалению, я делаю что-то неправильно, поэтому он будет захватить весь текст между двумя различными метками. Я знаю, что это вызвано не исключением «$]» между тегом pre и post, но я не могу найти правильный способ исправить это. Например:

[$String1$] 
useless text 
[$String2$] 

возвращает

[$String1$] 
useless text 
[$String2$] 

в одном матче.

Я хочу, чтобы получить

[$String1$] 
[$String2$] 

как два разных матча.

Любая помощь приветствуется.

Wade

Answer 1

RegEx жадный и будет стараться соответствовать столько, сколько может за один раз.

Для такого соответствия, когда у вас есть определенный формат, вместо того, чтобы сопоставлять все до закрывающего тега, попробуйте сопоставить NOT CLOSING TAG до закрытия тега. Это предотвратит прыжок до конца.

"\[\$[^\$]*\$\]" 

Answer 2

Сделать * квантор ленивым, добавив ?:

"\[\$[\s\S]*?\$\]" 

должен работать.

Или ограничить то, что вы позволяете быть матчи между вашим разделителей:

"\[\$.*\$\]" 

будет работать до тех пор, пока существует только один [$String$] раздел в каждой строке, и секции никогда не занимать несколько строк;

"\[\$(?:(?!\$\])[\s\S])*\$\]" 

проверяет соответствие до каждого символа после [$ что ни $] не следует там.

Answer 3

Не нужно использовать регулярное выражение. попробуй это. Если ваши тэги всегда задаются [$...$]

Set objFS = CreateObject("Scripting.FileSystemObject") 
strFile=WScript.Arguments(0) 
Set objFile = objFS.OpenTextFile(strFile) 
strContent = objFile.ReadAll 
strContent = Split(strContent,"$]") 
For i=LBound(strContent) To UBound(strContent) 
    m = InStr(strContent(i) , "[$") 
    If m > 0 Then 
     WScript.Echo Mid(strContent(i),m) & "$]" 
    End If 
Next