Select Code to Download

tie %hash,  'DB_File', [$filename, $flags, $mode, $DB_HASH];
foreach (keys %hash) { ... }

$hash->get($key, $value [, $flags]);