use DB_File;
tie %add, "DB_File", "foo.db" or die "Can't open FILENAME: $!\n";
$add{time} = time;
untie %add;