print "Buckets used/allocated:\t",scalar(%{$self}),"\n";
  while(($key,$value) = each %$self) {
    $num_keys++;
    $num_mu += scalar(@$value);
  }
  print "\t\tNumber Words/meanings:\t$num_keys/$num_mu\n";