use Data::Dumper;
use Storable;
#scan in the dict file and dump to an array - later chop up the array.
$wordlist = 'pos.txt';
##############
#reads in wordlist and returns an array of the words
sub scanWordlist{
open(DAT, $wordlist) || die("Could not open file!");
my @rawData=<DAT>...
I found this page highly strange.
http://glitter.net/amnesiac/catalyst.htm
it has both the words "drama queen" in there, and a picture in the upper left that looks like someone from another life.
Try as I might, I never manage to get airborne.