[Bio] / FigKernelScripts / match_dna_to_aligned_prots.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/match_dna_to_aligned_prots.pl

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

revision 1.2, Tue Jan 18 18:15:23 2005 UTC revision 1.3, Tue Apr 5 15:09:22 2005 UTC
# Line 73  Line 73 
73      {      {
74          print STDERR  "BAD LEN $id ", length($newdnaseq), " ", length($newprotseq), "\n";          print STDERR  "BAD LEN $id ", length($newdnaseq), " ", length($newprotseq), "\n";
75      }      }
76      $dnaid = "DNA_" . $1;      $dnaid = "DNA_" . $id;
77      $proid = "PRO_" . $1;      $proid = "PRO_" . $id;
78      print ">$dnaid\n$newdnaseq\n";      print ">$dnaid\n$newdnaseq\n";
79      print ">$proid\n$newprotseq\n";      print ">$proid\n$newprotseq\n";
80  }  }

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3