[Bio] / Babel / bin / load_md5rna2db.pl Repository:
ViewVC logotype

Diff of /Babel/bin/load_md5rna2db.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3, Fri Mar 25 18:50:31 2011 UTC revision 1.4, Fri Jul 8 19:39:49 2011 UTC
# Line 94  Line 94 
94  while (my $line = <DFILE>) {  while (my $line = <DFILE>) {
95    chomp $line;    chomp $line;
96    my ($md5, $id, $func, $org, $source) = split(/\t/, $line);    my ($md5, $id, $func, $org, $source) = split(/\t/, $line);
97    unless ($md5 && $id && exists($taxa->{$id})) { next; }    unless ($md5 && $id && $source && exists($taxa->{$id})) { next; }
98    
99    $funcID = ($func   && exists($func_ids->{$func}))  ? $func_ids->{$func}  : '\\N';    $funcID = ($func   && exists($func_ids->{$func}))  ? $func_ids->{$func}  : '\\N';
100    $srcID  = ($source && exists($src_ids->{$source})) ? $src_ids->{$source} : '';    $srcID  = $src_ids->{$source};
101    $orgID  = '';    $orgID  = '';
102    $rankID = $taxa->{$id}[0];    $rankID = $taxa->{$id}[0];
103    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3