[Данные, строки] Как заменить знаки в строке

[Atall]

Доброго времени суток!

Господа прошу помощи. Совсем запутался. Не понимаю как написать шаблон.

есть файл с большим количеством тегов со значениями внутри типа:

<numb>12-34-56789-123</numb>

нужно заменить все "-" на ":"

заранее благодарю!

 

[madmasles]

Atall

$sText = '<numb>12-34-56789-123</numb>'
$sText = StringReplace($sText, '-', ':')
MsgBox(0, '', $sText)

Или надо заменить только внутри тегов?

 

[Atall]

надо заменить внутри тегов и через функцию StringRegReplace

забыл уточнить что номера внутри тегов не известны

 

[madmasles]

Atall [?]

и через функцию StringRegReplace

? ???

 

[Atall]

StringRegExpReplace :'(

 

[axlwor]

зачем? Это медленно и неудобно

 

[Atall]

а не медленно это как?

 

[asdf8]

$sText = '<numb>12-34-56789-123</numb>'
$sText = StringRegExpReplace($sText, '<numb>(\d+)-(\d+)-(\d+)-(\d+)</numb>', '<numb>\1:\2:\3:\4:</numb>')
MsgBox(0, '', $sText)

Не настолько уж это медленно

 

[Atall]

Все работает

Спасибо за быстрый ответ.

 

[CreatoR]

Можно ещё так:

$sText = '<numb>12-34-56789-123</numb>'
$sText = StringRegExpReplace($sText, '(<numb>)?-?(\d+)-(</numb>|\d)', '\1\2:\3')
MsgBox(0, '', $sText)

 

[asdf8]

[?]

Можно ещё так:

Так будет заменять в любом месте, даже там где ненадо

$sText = '<любой тег>12-34-56789-123-123</любой тег>'
$sText = StringRegExpReplace($sText, '(<numb>)?-?(\d+)-(</numb>|\d)', '\1\2:\3')
MsgBox(0, '', $sText)

Можно было бы попробовать так:

$sText = StringRegExpReplace($sText, '(?<=<numb>(?:\d+[-:])*)(\d+)-(?=(?:\d+-?)*</numb>)', '\1:')

но, в автоите это не срабатывает