Help for this page

Select Code to Download

Select or download this

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