RexExp с условным оператором
если '-00' или '_000' или '_00' то "" иначе как есть
'АБВГ 123.456.789-01' -> 'АБВГ.123456.789-01'
'АБВГ.123456.789-00' -> 'АБВГ.123456.789'
'АБВГ.123 456.789_00' -> 'АБВГ.123456.789'
'АБВГ.123456.789_000' -> 'АБВГ.123456.789'
Пытаюсь так:
на выходе "АБВГ.123456.789-00"
если '-00' или '_000' или '_00' то "" иначе как есть
'АБВГ 123.456.789-01' -> 'АБВГ.123456.789-01'
'АБВГ.123456.789-00' -> 'АБВГ.123456.789'
'АБВГ.123 456.789_00' -> 'АБВГ.123456.789'
'АБВГ.123456.789_000' -> 'АБВГ.123456.789'
Пытаюсь так:
Код:
;$sText='АБВГ.123456.789'
$sText='АБВГ 123.456.789-00'
$sPatOB='([А-Я]{4})(?:\s?\.?)(\d{3})(?:\s?\.?)(\d{3})(?:\s?\.?)(\d{3})'
$sPatISP='([\-_][0-9\/]{1,3})?'
$sPat=$sPatOB&$sPatISP
$sRep="$1.$2$3.$4$5"
if StringRegExp($sText,$sPat,0) then
$aResult = StringRegExpReplace($sText, $sPat, $sRep)
ConsoleWrite($aResult)
EndIf
на выходе "АБВГ.123456.789-00"