# now hack off the first lump of words @list_of_words = split /[ \t\r\f]+/, $text, $n;