Select Code to Download

KEY:    msgagt
...
KEY:    r#FCMComposite_1_2
Use of uninitialized value in print at parse_4_ovo.plx line 22, <$out>
+ line 11.
VALUE:

_id -- severity
e -- AEM001
msgagt -- ESM_WMB_AIX

my $data = 
qq#'msgagt=ESM_WMB_AIX,sec_id=Sec_id,severity=Low,node=test,msgnode=qw
+mbap01.cardinalhealth.net,utc={2007-04-26
...
error has been reported by the BIPXML4C component.:XML}' #;
print "$_\n" for $data =~ /((?:\w+=\w+)|(?:\w+=\{.*?\}))/g;

msgagt=ESM_WMB_AIX
sec_id=Sec_id
...
AlertType=AEM
AppName=AEM
Message=5004