dbmopen(%DATA, "filename", 0600) || die "Darn!";