my @ary=split(" ",$_) while (<DATA>);
print "@ary";
__DATA__
These are words
These are more words