45 |
my $log = $lookup->_get_logger; |
my $log = $lookup->_get_logger; |
46 |
$log->info("working on $database in $db_path"); |
$log->info("working on $database in $db_path"); |
47 |
|
|
|
my $path = './db/'; |
|
|
|
|
48 |
my $db = new WebPAC::Store( |
my $db = new WebPAC::Store( |
49 |
path => $db_path, |
path => $db_path, |
50 |
|
database => $database, |
51 |
); |
); |
52 |
|
|
53 |
my $est_config = $config->{hyperestraier} || $log->logdie("can't find 'hyperestraier' part in confguration"); |
my $est_config = $config->{hyperestraier} || $log->logdie("can't find 'hyperestraier' part in confguration"); |