* Fix genecard and harvester parsers

[function2gene.git] / bin / results_to_table

diff --git a/bin/results_to_table b/bin/results_to_table
index 04f2f6df3a01419025bba29390888401e7a80df3..24c94004380c993627d9b3819574c340c840b64b 100755 (executable)
--- a/bin/results_to_table
+++ b/bin/results_to_table
@@ -75,12 +75,14 @@ while (<$search_results_fh>) {
      $databases{total}{total}{count}++;
 }
 
-our ($keyword,$gct,$hvt,$nct,$t);
+our ($keyword,$gct,$hvt,$nct,$t) = ('Keyword','GeneCards','Harvester','NCBI','Total');
      format STDOUT =
 @<<<<<<<<<<<<<<<<<<<<<< & @>>>>>>>>>> & @>>>>>>>>>> & @>>>>>>>>>> & @>>>>>>>>>> \\
 $keyword,                 $gct,     $hvt,     $nct,     $t
 .
-for$keyword (sort keys %terms) {
+write;
+
+for $keyword (sort keys %terms) {
      ($gct,$hvt,$nct,$t) =
          map {
               if (not defined $_) {