use vars qw(%words); open FILE ... while <FILE> { $words{$_} = 1; } close FILE;
...creating a hash of words from a CR-delimited list of words. The hash winds up taking up a few megabytes of RAM, but it's absolutely never written to, so I figured it would be shared between the mod_perl processes. However, each process grows by a few megs...
What's the best way to get around this?
- ben