http://www.perlmonks.org?node_id=100668


in reply to Being pretentious, and getting away with it.

A quick test of 5.6.1 build 628 using (did I do this correctly?):
for (split /(A)|B/, "1A2B3") {print "'$_' defined\n" if (defined);}
Produces same results as your 5.005_03 example? Your correction would revert to the 5.005_02 behavior with undef's coming through?

Is this a bug in split in the latest release?

I'm somewhat confused by this node as a newbie. (Please don't stone me!)