If you like to export all into the callers namespace put

@EXPORT      = qw (loadwords %some_words);
[download]

into your module code. But this is not a good idea. what about returning a reference to the new created %somewords?

sub loadwords {
    my @words = qw(a able about above across actually after again all)
+;
    my %some_words;
    foreach (@words) { $some_words{$_} = "1"; }
    return \%some_words;
}
[download]