My proposed fix:
$combined =~ s/([a-z]+)(\d+)/\U$1:$2/i; [download]
In reply to Re^2: How would I change a10 into A:10 in perl? by bart in thread How would I change a10 into A:10 in perl? by Tails