can someone give me the perl expression to always capture the code between BE and XX instead of substr function ?
it start always at pos 6 but length can vary, ending is also always with XXX to complete total length of 11
data a;
length c023 $11. ;
c023='400BE88XX';
ba=substr(c023,6,-6+index(c023,'X'));
run;
GreetZ,
Herman