$a = "a10, b10, C10";

$a =~ s/([a-z])([0-9]+)/\u\1\:\2/g;

print "$a\n";