Select Code to Download

#! perl -slw
use strict;
...
II  8   G   T
II  10  T   G

C:\test>1158701
{
...
  ">I"  => "CGTTGGCATAAAATGACTAGTAGCTAGATACCACAGATACGATACAACA",
  ">II" => "CGTCCCATAGACGATACAACACATCAGTATAAAATGACTAGTAGCAGAC",
}