DATA Step, Macro, Functions and more

PERL expression

Reply
Frequent Contributor
Posts: 89

PERL expression

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

Respected Advisor
Posts: 3,124

Re: PERL expression

data a;

  length c023 $11. ;

  c023='400BE88XX';

  ba=substr(c023,6,-6+index(c023,'X'));

  ba_prx=prxchange('s/(.*BE)(.*)(XX.*)/$2/o',-1,c023);

  run;

Haikuo

Ask a Question
Discussion stats
  • 1 reply
  • 139 views
  • 0 likes
  • 2 in conversation