DB<3> @foo = split /(A)|(B)/, "1A2B3"


  DB<4> x @foo
0  1
1  'A'
2  undef
3  2
4  undef
5  'B'
6  3