...
  while ($conn->FetchRow()) {
    my %data = $conn->DataHash();
    print "$data{'server_name'}\n";
  ...