use DB_File;

my %hash
tie (%hash, 'DB_File', 'hash.dbm', O_RDWR) || die $!;