Help for this page

Select Code to Download


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