Help for this page
if ( /(ct(?:a|g)a(?:c|t))(.{20,50})$/i ){ $branch = $1; # this will be 'ctXaX' $pyrich = $2; # this will be the 20-50 chars at the end }