# my($host) = $config{'db'}{'db_host_name'}; # my($db) = $config{'db'}{'db_name'}; # my($user) = $config{'db'}{'db_user'}; # my($pw) = $config{'db'}{'db_pw'}; # my ($host,$db,$user,$pw) = ($config{qw(db_host_name db_name db_user db_pw)}); # my $dbh = vol::connect_new(@{$config{'db'}{qw(db_host_name db_name db_user db_pw)}}); # etc., etc., etc. 1;