perl -MO=Deparse -e "split('|', 'ab|c');" split(/|/, 'ab|c', 0); -e syntax OK [download]
In reply to Re^2: using split by imp in thread using split by maurkb