Select Code to Download

#! perl -slw
use strict;
...
unique(E,D):
unique(C,B):
ABCDEFGHIJKLMNOPQRSTUVWXYZZYXWVUTSRQPONMLKJIHGFEDCBA

#! perl -slw
use strict;
...
__DATA__
ABCDEFGHIJKLMNOPQRSTUVWXYZ
ABCDEFGHIJKLMNOPQRSTUVWXYZ