как "вырезать" несколько символов из текстового файла?

[urrya]

Всем привет.
Снова есть не решаемая (для меня) задача.
Есть текстовый файл, в нём постоянно меняется содержимое.
Запись в том файле всегда примерно вот такого вида -

$text = "\Jc1PFXyg7C0Z\RzS3QrHWspyy\zxOTUtBwq4cf\2Z9AwjhDxDjc\hxTKz60APRJZ\RJhfZHRbLEeh\szckKqp22KKj\tjSQ7NZEAzyY\obshuTjA20cm"

Каждые 13 символов "\RzS3QrHWspyy" это имена других файлов.
Нужно иногда "вырезать" из того файла те самые имена вместе с "\".
Как это сделать знаю, но у меня ничего не получается. Не могу задать искомый образец (шаблон) для его стирания.
Например:

$result = StringRegExpReplace($text, "[\" & $shablon & "](?-i ... )", "")

В переменной шаблона -

$ch = 1
$shablon = StringMid($text, $ch, 13)

И регистр соблюдать надо обязательно.
Прошу помощи.
Заранее спасибо всем ... .

 

[AZJIO]

$result = StringReplace($sText, "\RzS3QrHWspyy", '', 0, 1)

 

[urrya]

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

 

[inververs]

$result = StringRegExpReplace($text, "(?-i)\\"&$shablon&"[^\\\s+]+", "")

 

[madmasles]

urrya,
ИМХО, AZJIO прав, проще сделать так.

Local $sTxt = '\Jc1PFXyg7C0Z\RzS3QrHWspyy\zxOTUtBwq4cf\2Z9AwjhDxDjc\hxTKz60APRJZ\RJhfZHRbLEeh\szckKqp22KKj\tjSQ7NZEAzyY\obshuTjA20cm', _
		$aTxt, $sDel

$aTxt = StringSplit(StringTrimLeft($sTxt, 1), '\')
For $i = 1 To $aTxt[0]
	$sDel = '\' & $aTxt[$i]
	$sTxt = StringReplace($sTxt, $sDel, '', 0, 1)
	ConsoleWrite('$sDel: ' & $sDel & ', $sTxt: ' & $sTxt & @LF)
Next

 

[urrya]

madmasles
Спасибо!