in reply to Search and replace with expansion
s/(\d+)[xX*](\d+)/@{[($1) x $2]}/g;
Much nicer, IMHO. Thanks.