Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl

...
        grep length $_ >= $min, split /$re/, $str
    )[0];
}

Select or download this
```
A: AAA
C: CCCCCC
G: GGGG
T: TTT
```