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.
--
<fanf@???> <dot@???>
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}}
