if ( ($key eq 'ID') or 'TITLE' or 'GENE' or 'CYTOBAND'
     or 'LOCUSLINK' or 'CHROMOSOME' or 'SCOUNT')
  # ...
}