@$hashref{keys %some_hash} = values %some_hash;

##</code><code>##

my %data = %{$dbh->selectall_hashref()->[0]};