Help for this page
#!/usr/bin/env perl use strict; ... my $prot="HKTTLDSSRTTTTAABNNRFGHGHGYYH"; my @triplets = $prot =~ /.{1,3}/g; p @triplets;
[ [0] "HKT", ... [8] "GYY", [9] "H" ]