Rexx regualr expresison with rexxre

[simo78]

Hello,

can someone tell me why this code doesn't work?

Code: Select all

/*rexx*/

rcc = rxfuncadd('reloadfuncs', 'rexxre', 'reloadfuncs')
if rcc then fail('load' rxfuncerrmsg())
call reloadfuncs


data = 'Apr 29 11:55:17 su: ptjm to root on /dev/ttyp2'
re = '[^:]+ ([0-9]{2}) : ([0-9]{2}) : ([0-9]{2}) +([^:]+): (.+)'
call reParse re, data, 'xs', 'hh', 'mi', 'ss', 'component', 'msg'
say "component" component

The variable component is empty.
Another question: what should I do to use regular expression on z/OS?

Thanks in advance.

[MrSpock]

This is an IBM-supported REXX language?

[simo78]

I really don't know that.
I use rexxre on Windows with Regina REXX and for example the above code works good:

Code: Select all

somestring = ' Chemical:, "1,2-Dichlorobenzene Value","1,2-Dichlorobenzene QA Flag",,,1.2345,'

fieldre = '("[^"]*"|[^,"]*)'
  delimre = ' *, *'
  re = fieldre
  /* 6 is one less than the number of fields expected */
  do 6
    re = re || delimre || fieldre
    end
       
  /* reComp that if it will be used repeatedly ... */
  rere = reComp(re, 'x')

if left(rere,1) then say 'oh, poo'


  if reParse(rere, somestring, 'stx', 'FIELDS') then   
     say "NUMBER=" fields.6

[dbzTHEdinosauer]

when you load functions in regina, the functions are available in the environment.
these functions (on your pc) are supported by code that you had to download and install on your pc and register.

don't believe that the functions that you have 'loaded' on the pc are available on the mf.