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


in reply to From database to hash table

If you want a reference to a HoH:
my $href = $dbh->selectall_hashref(<<SQL, 's_week');
select s_week,s_month,s_workperiod from <tablename>
SQL

[download]

In Section Seekers of Perl Wisdom