<>;s/\d+(?=\D*$)/++($a=$&)/e,print for<>