Consult perldoc -f split, specifically the discussion of using a negative number as LIMIT.
In reply to Re^3: Delimeter Count? by Fletch in thread Delimeter Count? by Ronnie