From b7fa49b314e0844bbca5ed06cbe5f7e6bfa651c4 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Tue, 26 Feb 2008 01:08:51 +0000
Subject: [PATCH] skip unreviewed and fragment records

git-svn-id: file:///srv/svn/function2gene/trunk@35 a0738b58-4706-0410-8799-fb830574a030
---
 bin/parse_uniprot_results | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/bin/parse_uniprot_results b/bin/parse_uniprot_results
index 6b90eb7..96a176d 100755
--- a/bin/parse_uniprot_results
+++ b/bin/parse_uniprot_results
@@ -136,6 +136,8 @@ FILE: while ($_ = $dir->read) {
 	  if (not defined $current_field and $type ne 'ID') {
 	       next FILE;
 	  }
+	  next FILE if $type eq 'DE' and $data =~ /\(Fragment\)/;
+	  next FILE if $type eq 'ID' and $data =~ /Unreviewed;/;
 	  if (not defined $current_field or $current_field->{type} ne $type) {
 	       if (defined $current_field) {
 		    push @fields,$current_field;
-- 
2.39.2