s/(\d+)/reverse(sprintf("%013d", scalar(reverse($1))))/eg;