@res = split /\s(?=\d)/, $string;

##</code><code>##

@res = split /\s(?=\d+)/, $string;