$string = "atccatccctttaat";
$triplets0 = $line=~ /(...)/;