my @rows; die qq(SQL failed: ), $db->Error(), qq(\n) if ($db->Sql("SELECT srv_id FROM server_tbl WHERE srv_name='$srv'")); while ($db->FetchRow()) { my %data = $db->DataHash(); print qq(Index key is $data{"srv_id"}\n); #srv_id value # If you want to store information from multiple rows push @rows, {%data}; }