my $p_obj = tie my %pref, 'DB_File', "$DBDIR/$postfix_file", O_RDONLY, 0666, $DB_BTREE
or die "couldn't tie postfix db $DBDIR/$postfix_file: $!";
$p_obj->seq( $key, $prefixes, R_CURSOR );
my $p_obj = tie my %pref, 'DB_File', "$DBDIR/$postfix_file", O_RDONLY, 0666, $DB_BTREE
or die "couldn't tie postfix db $DBDIR/$postfix_file: $!";
$p_obj->seq( $key, $prefixes, R_CURSOR );