Help for this page
use strict; use warnings; ... print qq{Splitting after $enzymeSeq\n}; my @chunksAfter = split m{$rxSplitAfter}, $sequence; print qq{ $_\n} for @chunksAfter;
Sequence: CAGTTTCGATCGAATCATTATTGGATCCGCATGCGTCAGGATCCAATC ... CAGTTTCGATCGAATCATTATTGGATCC GCATGCGTCAGGATCC AATC