gistfile1.pl

sub _serverName {
  my $self = shift;
  my $row = shift;
  return (length($row->{'inventory_tag'})
             ? $row->{'inventory_tag'}
             : (length($row->{'hostname'})
               ? $row->{'hostname'}
               : (length($row->{'rack_id'})
                 ? $row->{'rack_id'}
                 : (length($row->{'nickname'})
                   ? $row->{'nickname'}
                   : $row->{'id'}))));
}