Help for this page

Select Code to Download

Select or download this

Splits the string EXPR into a list of strings and returns that
list.  By default, empty leading fields are preserved, and
empty trailing ones are deleted.

Select or download this

perl -MData::Dumper -e '
$str = "GTGNNTNNG"; 
@nseg = split(/[ATCG]+/,$str); 
@nseg = grep {/./} @nseg;
print Dumper \@nseg;'