Help for this page

Select Code to Download


  1. or download this
    my $base = ("A"|"C"|"G"|"T");
  2. or download this
    while (<INPUT>)
    {
        print if /^[ATCG]+$/ && length >= $ideal;
    }
    
  3. or download this
        print if /^[ATCG]{250,}$/;