$ perl -E '$_="This and that and other";@x=  $_=~ /[^\s]+/g;; say for @x'
This
and
that
and
other