Perl does that for automagically. split() knows how many scalars (if a finite number) you had on the left-hand side of the function call, so it will optimize itself thus.

japhy -- Perl and Regex Hacker