Regular gets the text

[Davider]

Hi,
I want to get the red text in the following multiple lines of text
The following Powershell code achieves the goal
What is the QM code with the same effect

Thanks in advance for any advice and help
david


Unche %P_Ou%; Value; DeviceID%
anch; %P_Er%; Text%
bncheck %S_Bt%; Val%;

 

Code:

Copy      Help

 @"
Unche %P_Ou%; Value; DeviceID%
anch; %P_Er%; Text%
bncheck %S_Bt%; Val%;
"@ | Select-String -Pattern '(?m)%([^%]*)%.*$' -AllMatches |
Foreach-Object { $_.Matches | %{ $_.groups[1].value } }

Macro Macro4

Code:

Copy      Help

out
str dd=
;Unche %P_Ou%; Value; DeviceID%
;anch; %P_Er%; Text%
;bncheck %S_Bt%; Val%;

str pattern="(?m)%([^%]*)%.*$"
str d
ARRAY(str) a
findrx(dd pattern 0 4 a)
out a