my %hash = (); while ($connection->FetchRow()) { my %dataRow = $connection->DataHash(); $hash{ $dataRow{Client_ID} } = $dataRow{Contact_Information}; };