#!/usr/bin/perl -w
use strict;
use Bio::AlignIO;
use Bio::SeqIO;
use Fcntl qw(O_RDWR O_CREAT);
use DBM::Deep;
require Variation::RecombConfig;
use Variation::Recomb;
use POSIX qw(ceil floor);
use DirHandle;
use File::Temp;
use Data::Dumper;
# do lots of stuff to create a big complex hash, %positions_hash

my $db = DBM::Deep->new( -filename =>"positions.db", pack_size => 'large');
$db->import(\%positions_hash);
$db->optimize();