Select Code to Download

#!/usr/bin/perl

...
    }
  return \@order;
  }

K B I S Y A Q
B S N A
...
V W
U V
("combined", ["S", "U" .. "Y", "T", "Z"])