Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
      }
   }
}
  2. or download this
    S is identical to F
T is identical to G
...
P is identical to E
K is identical to Z
M is identical to D
  3. or download this
    my @keys = keys %lists;

...

   for my $i2 ($i1+1..$#keys) {
      my $key2 = $keys[$i2];
  4. or download this
    for my $key1 (keys %lists) {
   for my $key2 (keys %lists) {