my $number = "0123456789012345";

$number =~ tr/0123456789/AB-CDEFGHK/;