Help for this page
sort_and_print_hash_keys(\%letters);
#!/usr/bin/perl use strict; ... my $s = shift; say join " ", map eval "$s =~ tr/$_//", qw/A C G T/;