swap the data

[BrahmanandaRao]

data test;
infile datalines;
input Match $12.;
datalines;
AUS Vs WI
IND Vs SRI
AUS Vs WI
WI Vs AUS
IND Vs AUS
AUS Vs IND
SRI Vs IND
NZ Vs SA
SA Vs NZ
;
run;

Required Output like below

GIVEN DATA	REQUIRED O/P
AUS Vs WI	WI Vs AUS
IND Vs SRI	SRI Vs IND
AUS Vs WI	WI Vs AUS
WI Vs AUS	AUS Vs WI
IND Vs AUS	AUS Vs IND
AUS Vs IND	IND Vs AUS
SRI Vs IND	IND Vs SRI
NZ Vs SA	SA Vs NZ
SA Vs NZ	NZ Vs SA

[PeterClemmensen · Accepted solution]

Do like this

data test;
infile datalines;
input Match $12.;
datalines;
AUS Vs WI
IND Vs SRI
AUS Vs WI
WI Vs AUS
IND Vs AUS
AUS Vs IND
SRI Vs IND
NZ Vs SA
SA Vs NZ
;
run;

data test2;
   set test;
   name=prxchange('s/(\w+) Vs (\w+)/$2 Vs $1/', -1, Match);
run;

[BrahmanandaRao]

Thank you for solution

Regards,

ANAND

[Kurt_Bremser]

Or this:

data have;
infile datalines;
input Match $12.;
datalines;
AUS Vs WI
IND Vs SRI
AUS Vs WI
WI Vs AUS
IND Vs AUS
AUS Vs IND
SRI Vs IND
NZ Vs SA
SA Vs NZ
;
run;

data want;
set have;
match = catx(' ',scan(match,3),scan(match,2),scan(match,1));
run;

[BrahmanandaRao]

Thank you sir for your  support

Regards,

Anand