perl

In perl, how would one read a text file into an array such that each word (as separated by whitespace) would become a different element?

>>15
file('lol').read() is bad. It copies the whole file to memory.
file_get_contents('lol') is bad. It copies the whole file to memory.