Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
"my @queries = qw[ GCGAT CACGT ];
...
'GCGAT' matched 'GCGANBBB'
'CACGT' matched 'CNCGTNNN'
'CACGT' matched 'CBCGTNNN'
  2. or download this
    >perl -wMstrict -le
"use List::MoreUtils qw(uniq);
...
'GCGAT' matched 'GCGANBBBHIT'
'CACGTT' matched 'CNCGTTNNNHIT'
'CACGTT' matched 'CACGTTNNNHIT'