Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
>sequence_0808
CCACCCTCGTGGTATGGCTAGGCATTCAGGAACCGGAGAACGCTTCAGACCAGCCCGGAC
TGGGAACCTGCGGGCAGTAGGTGGAAT
  2. or download this
    {
  sequence_0808 => "CCACCCTCGTGGTATGGCTAGGCATTCAGGAACCGGAGAACGCTTCAGAC
+CAGCCCGGACTGGGAACCTGCGGGCAGTAGGTGGAAT",
  sequence_5849 => "CCTGCGGAAGATCGGCACTAGAATAGCCAGAACCGTTTCTCTGAGGCTTC
+CGGCCTTCCCTCCCACTAATAATTCTGAGG",
  sequence_5959 => "CCATCGGTAGCGCATCCTTAGTCCAATTAAGTCCCTATCCAGGCGCTCCG
+CCGAAGGTCTATATCCATTTGTCAGCAGACACGC",
}
  3. or download this
        if ( $line =~ /^(HEAD_PATTERN)/ ) {
        $data    = \ $deeply{nested}{structure}{$1}; # reference data 
+       
    } else {
        $$data .= $line;                            # derefrence data
    }