On Mon, 24 Jul 2006, Doug wrote:
>
> I build my DB files using exim_dbmbuild, which give me the usual .dir
> and .pag files. If we can pretend for a second that I lose all other
> files apart from the .dir and .pag files, is there any way that I can
> reconstruct usable lists of data from them.

#!/usr/bin/perl

dbmopen(%hash, "/path/to/dbm/without/.dir/or/.pag", 0666)
        or die "dbmopen: $!";
while (($key,$val) = each %hash) {
        print "$key: $value\n";
}
dbmclose(%hash);


Tony.
-- 
<[EMAIL PROTECTED]>   <[EMAIL PROTECTED]>   http://dotat.at/   ${sg{\N${sg{\
N\}{([^N]*)(.)(.)(.*)}{\$1\$3\$2\$1\$3\n\$2\$3\$4\$3\n\$3\$2\$4}}\
\N}{([^N]*)(.)(.)(.*)}{\$1\$3\$2\$1\$3\n\$2\$3\$4\$3\n\$3\$2\$4}}

-- 
## List details at http://www.exim.org/mailman/listinfo/exim-users 
## Exim details at http://www.exim.org/
## Please use the Wiki with this list - http://www.exim.org/eximwiki/

Reply via email to