http://www.perlmonks.org?node_id=1186460


in reply to Re^4: How to pass hash site variables into sql connection using perl?
in thread How to pass hash site variables into sql connection using perl?

But you didn't change the hash to suit like this

#!perl use strict; my %site_map = ( site1 => { host => 'dam.sd.aog.com', db => 'a_site1_current', current => { user => 'ad', pw => '123' } }, site2 => { host => 'dam.sd.aog.com', db => 'a_site2_current', current => { user => 'ad', pw => '123' } }, site3 => { host => 'dam.sd.aog.com', db => 'a_site3_current', current => { user => 'ad', pw => '123' } }, );