Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
    "my $seq =
    ...
     printf qq{'$_' } for @subseqs;
    "
    'AAAATTT' 'ATATAT'
    
  2. or download this
    >perl -wMstrict -le
    "my $seq =
    ...
    "
    matched 'AAAATTT' at 12 thru 18
    matched 'ATATAT' at 37 thru 42