finding needle in a haystack

[Bret Goodfellow]

All right, I know how to do this in REXX because there is a word()
function, but how do I do this in Perl.  I want to read in one record at
a time, that has space-delimited fields.  There may be multiple spaces
between the words.  I want to be able to get for example, the 4th word
of the record.  How do I do this?  Just for grins, my record looks like
this:
 
/dev/sun11/lvol13   1032192  377921  613445   38% /techsupp