Date: Thu, 11 Dec 1997 11:05:46 -0800 (PST) From: David K Phinney <dphinney@dowco.com> To: info@bentreality.com (Jack Wenger) Cc: freebsd-isp@FreeBSD.ORG Subject: Re: Makemap Message-ID: <199712111905.LAA08639@lithium.dowco.com> In-Reply-To: <3.0.32.19971211104409.0098f380@acw-web.com> from Jack Wenger at "Dec 11, 97 10:44:09 am"
next in thread | previous in thread | raw e-mail | index | archive | help
Hi,
You can try this script (you need Berkeley DB support in your Perl 5):
use DB_File;
use Fcntl;
tie %vuser, "DB_File", "/etc/virtusertable.db", O_RDONLY, 0666 ||
die "tie: $!\n";
while (($key, $value) = each %vuser) {
print "$key\t\t$value\n";
}
untie %vuser;
Granted, the output's not very pretty looking...
Regards,
--dave
David K. Phinney
Systems/Network Manager (604) 606-5728
dowco.com internet dave@dowco.com
> HELP!
> I just did a stupid. I added an entry to my virtusertable and did:
>
> makemap hash ./virtusertable > ./virtusertable
>
> destroying my virtusertable.
> Is there any way I can get the information back out of virtusertable.db?
> It's a 32k file with todays date. No, I don't have any backup yet (bad
> sysadmin, BAD).
> I have no way to tell what's in the table anymore.
>
>
> ------------- Excellence in Web Design --------------
> Bent Reality Graphics Jack Wenger, Owner
> info@bentreality.com http://www.bentreality.com
> 608-233-8571 or 1-888-701-1026
> IBM Business Partner - Internet Specialist
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?199712111905.LAA08639>