$ perl -E ' say map { qq{"$_" }}  split /(\d+)/ for qw[ AB23C ABC23 23BC ABC ]'
"AB" "23" "C"
"ABC" "23"
"" "23" "BC"
"ABC"