push(@triplets, [ substr($line, $_) =~ /(...)/g ]) for 0..2;