$_="a1 a2 a3";
while(?a(\d)?g){ print $1; }