Help for this page

Select Code to Download

Select or download this

#! perl
use strict;
...
}

print $_, "\n" for sort keys %matches;

Select or download this

 0:15 >perl 563_SoPW.pl
AAABBDAAA
...
AAADCBAAABBDAAA

 0:23 >