Help for this page

Select Code to Download


  1. or download this
    sub get_oligo_seqs{
    my ($fh) = shift;
...
    }
    return @seqs;
}
  2. or download this
    sub get_oligo_seqs{
    my ($fh) = shift;
...
    }
    return @seqs;
}
  3. or download this
    sub get_oligo_seqs{
    my ($fh) = shift;
    return map { ( split /\t/ )[1] } <$fh>;
}