Help for this page
@in = { @out = { qw[M N], qw[C B A], ... qw[C G F H J], qw[U S], qw[M K], qw[V T], }; };
@out = sort{ "@$a" cmp "@$b" } @in;