split /\s+/
would probably be even better as
split ' '

>perl -e "@f = split(' ',   ' a b c '); print scalar @f
3
>perl -e "@f = split(/\s+/, ' a b c '); print scalar @f
4
[download]

' ' does the same thing as /\s+/, but it ignores leading spaces.

split's documentation