Philip Mikal, Partner & Co-Founder

Did you blow out Sendmail's /etc/aliases? Where did it go? Restore from the aliases.db file with this handy and simple script.

./etc_aliases_restore.pl > /etc/aliases

use strict;
use warnings;
use DB_File;

our (%h, $k, $v);

my $db = "/etc/mail/aliases.db";

tie %h, "DB_File", 
	$db, 
	O_RDWR|O_CREAT, 
	0666, 
	$DB_HASH or die 
	"Can't open $db: $!";

while (($k, $v) = each %h) { 
	chop($k); 
	chop($v); 
	print "$k: $v\n" 
}

untie %h;