$filter_clean =~ tr/A-Z/22233344455566677778889999/;