my($ref) = \@array;
my($file) = '/usr/dict/words';
&load_array($ref,$file);
# $ref now contains a reference to an array which contains
# all the words in /usr/dict/words, with the newlines
# removed.