a simple dbm program