Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
    "my $line =
    ...
    >crispr_1 'AAAATTTTCCCCGGGGAAAGG'
    >crispr_2 'AAAACCCCTTTTGGGGAAAGG'
    { "AAAACCCCTTTTGGGGAAAGG" => 1, "AAAATTTTCCCCGGGGAAAGG" => 2 }