Select Code to Download

  foreach (@words) { my $some_words{$_} = "1"; }

  @EXPORT = qw/ loadwords %somewords /;

...
  ## in the loadwords function

  for(@words) { $somewords{$_} = "1"; }

  %somewords = map { $_ => 1 } @words;