tie my %f1, "DBM::Deep", {
   file      => "mydb.sdbm",
   pack_size => 'large',
};