my $string = "A BC 1 23DEF45 6"; my @parts = $string =~ /([a-zA-Z]+|\d+)/g;