in reply to Help perlifying this string parse-o-rama

Relatively straight forward:

$s = "firstfield second field KNOWNWORD alwaysOneWord then one or more + make the last field";; @fields = $s =~ m[(\S+)\s(.+)\sKNOWNWORD\s(\S+)\s(.+)];; print join '|', @fields;; firstfield|second field|alwaysOneWord|then one or more make the last f +ield

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority". I knew I was on the right track :)
In the absence of evidence, opinion is indistinguishable from prejudice.