my @to_strings = map {tr/a-zA-Z/A-Za-z/r} @from_strings;