$!=$_.comb,say |map {$![$_]},$_~~m:g/\d/for get.split(";")