Add results to table; modify the search parssers to work better. Fix error in get_ncb...

[function2gene.git] / bin / get_ncbi_results

diff --git a/bin/get_ncbi_results b/bin/get_ncbi_results
index 7a869014bc15525ab80f36c0fc02ad50ac94f4eb..3e1a6259ce1d2e717727ad7a9ed4a1d1a3bef118 100755 (executable)
--- a/bin/get_ncbi_results
+++ b/bin/get_ncbi_results
@@ -143,6 +143,7 @@ while (<$terms>) {
 
      # Get XML file
      my @current_ids;
+     print {$xml_file} "<opt>\n";
      while (@current_ids = splice(@gene_ids,0,5)) {
          $uri = URI->new($options{pubmed_site}.$options{pubmed_get_url});
          $uri->query_form($uri->query_form(),
@@ -167,10 +168,10 @@ while (<$terms>) {
          $response =~ s/^\s*<pre>//gso;
          $response =~ s#</pre>\s*$##gso;
 
-
          print {$xml_file} $response;
          sleep 10;
      }
+     print {$xml_file} "</opt>\n";
      undef $xml_file;
 }