$sub = substr($seq,6, 4);

##</code><code>##

$sub = substr($seq, 5, 6);