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

Diff of /FigKernelScripts/make_phob_from_seqs.pl

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

revision 1.2, Tue Apr 12 21:25:21 2005 UTC revision 1.3, Thu Apr 14 11:45:18 2005 UTC
# Line 1  Line 1 
1    
2  &make_sure("clustalw","protdist","clustal_to_fasta","fasta_to_phylip","trim_sequences","fitch");  &make_sure("clustalw","protdist","clustal_to_fasta","fasta_to_phylip","trim_sequences","neighbor");
3    
4  $usage = "usage: make_phob_from_seqs Directory [-trim] < Seqs";  $usage = "usage: make_phob_from_seqs Directory [-trim] < Seqs";
5    
# Line 54  Line 54 
54  &run("cp outfile distance.matrix");  &run("cp outfile distance.matrix");
55  rename("outfile","infile");  rename("outfile","infile");
56    
57  open(FITCH,"| fitch > /dev/null") || die "could not open fitch";  open(NEIGHBOR,"| neighbor > /dev/null") || die "could not open neighbor";
58  print FITCH "Y\n";  print NEIGHBOR "Y\n";
59  close(FITCH);  close(NEIGHBOR);
60  rename("outtree","tree.dnd");  rename("outtree","tree.dnd");
61    
62  unlink("infile");  unlink("infile");

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3