Help for this page

Select Code to Download

Select or download this

>perl -wMstrict -le
"my $s = join '', qw(ABCbb bCBAd ddCAC DDDAC ABBBC ABCDA ABCCC CCCAB);
...
"
'ABCbbbCBAdddCACDDDACABBBCABCDAABCCCCCCAB'
'DDD'  'BBB'  'CCC'  'CCC'