[RegExp] Как получить имя и значение тега

[IgRo]

Имеется многострочный документ с тегами вида

<Комментарий>не менее 
5,5 кДж/м2</Комментарий>

Как получить имя
Пытаюсь так

$sName = StringRegExpReplace($sNodeXML, '.*</([^<>/]+)>.*', '$1')

 

[mef-t]

Re: [RegExp] Как получить имя тега

Что именно хотите получить на выходе.
Чему должен быть равен $sName ?

 

[madmasles]

Re: [RegExp] Как получить имя тега

IgRo
Попробуйте так.

$sText = '<Комментарий>не менее' & @CRLF & '5,5 кДж/м2</Комментарий>'

$sName = StringRegExpReplace($sText, '(?s).*<([^<>/]+?)>.*', '$1')

ConsoleWrite(@extended & @TAB & $sName & @LF)

 

[erlik]

Re: [RegExp] Как получить имя тега

$sHtmlCode='<Комментарий>не менее 5,5 кДж/м2</Комментарий>'
$aTagName = StringRegExp($sHtmlCode,"(?s)<(\/?.+?)>", 1)
If IsArray($aTagName) Then
ConsoleWrite($aTagName[0])
Endif

 

[IgRo]

Re: [RegExp] Как получить имя тега

$sNodeXML='<Ref>1d377bda-d8c1-11de-8008-0015170f31a8</Ref>'& @CRLF
$sNodeXML &='<Owner xsi:type="CatalogRef">1d377bda-d8c1-11de-8008-0015170f31a8</Owner>'& @CRLF
$sNodeXML &= '<Комментарий>не менее' & @CRLF & '5,5 кДж/м2</Комментарий>'

$sName = StringRegExpReplace($sNodeXML, '(?s).*<([^<>/]+?)>.*', '$1')
ConsoleWrite($sName & @LF)

Выдает "1 Комментарий"
В идеале на выходе нужно получить

Ref, Owner, Комментарий

Добавлено:

Сообщение автоматически объединено: 9 Апр 2013

[РЕШЕНИЕ]

#include <array.au3>

$sNodeXML='<Ref>1d377bda-d8c1-11de-8008-0015170f31a8</Ref>'& @CRLF
$sNodeXML &='<Owner xsi:type="CatalogRef">1d377bda-d8c1-11de-8008-0015170f31a8</Owner>'& @CRLF
$sNodeXML &= '<Комментарий>не менее' & @CRLF & '5,5 кДж/м2</Комментарий>'
$sName= ""
$aTagName = StringRegExp($sNodeXML,"</([^<>/]+?)>", 3)
If IsArray($aTagName) Then
$sName=_ArrayToString($aTagName, ", ")
Endif
ConsoleWrite($sName & @LF)

[НЕ РЕШЕНО]
Получить значение

$sNodeXML='<Ref>1d377bda-d8c1-11de-8008-0015170f31a8</Ref>'& @CRLF
$sNodeXML &='<Owner xsi:type="CatalogRef">1d377bda-d8c1-11de-8008-0015170f31a8</Owner>'& @CRLF
$sNodeXML &= '<Комментарий>не менее' & @CRLF & '5,5 кДж/м2</Комментарий>'
$sValue = StringRegExpReplace($sNodeXML, '.*<([^<>/]+)(?:\sxsi:)?(.*="[^">]+")?>(.*?)</\1>.*', "'$2$3'")
ConsoleWrite($sValue & @LF)

На выходе

'1d377bda-d8c1-11de-8008-0015170f31a8'
'type="CatalogRef"1d377bda-d8c1-11de-8008-0015170f31a8'
<Комментарий>не менее
5,5 кДж/м2</Комментарий>

Не обработался тег Комментарий :stars:

 

[mef-t]

$sNodeXML='<Ref>1d377bda-d8c1-11de-8008-0015170f31a8</Ref>'& @CRLF
$sNodeXML &='<Owner xsi:type="CatalogRef">1d377bda-d8c1-11de-8008-0015170f31a8</Owner>'& @CRLF
$sNodeXML &= '<Комментарий>не менее' & @CRLF & '5,5 кДж/м2</Комментарий>'
$sNodeXML = StringRegExpReplace($sNodeXML, '(?<!\>)\r\n', ' ')
$sValue = StringRegExpReplace($sNodeXML, '.*<([^<>/]+)(?:\sxsi:)?(.*="[^">]+")?>(.*?)</\1>.*', "'$2$3'")
ConsoleWrite($sValue & @LF)

К сожалению не смог вставить "(?<!\>)\r\n" в общее выражение.

 

[gregaz]

Может так:

#Include<Array.au3>
$sText = "ddddddddddddddddddd"  & @CRLF & _ 
"<Ref>1d377bda-d8c1-11de-8008-0015170f31a8</Ref>"  & @CRLF & _ 
"<Owner xsi:type='CatalogRef'>1d377bda-d8c1-11de-8008-0015170f31a8</Owner>"  & @CRLF & _ 
"<Комментарий>не менее"  & @CRLF & _ 
"5,5 кДж/м2</Комментарий>"  & @CRLF & _ 
"ffffffffffffffffffffffffffffff"

$sPatern = ">([^<]+)</"
$aResult = StringRegExp( $sText, $sPatern, 3 )
_ArrayDisplay($aResult, ' Test Result ')