Genome Informatics Laboratory at KRIBB

User Tools

Site Tools

Trace: • two_bt_strains_2016 • post_phylosift.pl
post_phylosift.pl

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision		Previous revision
post_phylosift.pl [2018/01/30 16:31] – hyjeongpost_phylosift.pl [2021/03/17 13:09] (current) – external edit 127.0.0.1
Line 15: Line 15:
      
   @org_dir = grep { not /^\./ } readdir OUTDIR;   @org_dir = grep { not /^\./ } readdir OUTDIR;
-  print STDERR "Organisms detected: @org_dir";+  print STDERR "Organisms detected: @org_dir"\n;
   closedir OUTDIR;   closedir OUTDIR;
-  $final = "$ARGV[1].aln";+  $final = "$ARGV[1].fsa";
   unlink $final if -f $final;   unlink $final if -f $final;
   open ALIGN, ">>$final";   open ALIGN, ">>$final";
Line 28: Line 28:
       $fasta = "$ARGV[0]/$org/alignDir/$ARGV[1].codon.updated.1.fasta";       $fasta = "$ARGV[0]/$org/alignDir/$ARGV[1].codon.updated.1.fasta";
       $fasta = "$ARGV[0]/$org/alignDir/$ARGV[1].long.1.fasta" if $ARGV[1] =~ /16s_reps_bac/;       $fasta = "$ARGV[0]/$org/alignDir/$ARGV[1].long.1.fasta" if $ARGV[1] =~ /16s_reps_bac/;
-      open RESULT, $fasta or die "Can't open file $fasta for reading!";+      open RESULT, $fasta or print STDERR "Can't open file $fasta for reading!\n";
       while (<RESULT>) {       while (<RESULT>) {
           chomp;           chomp;
post_phylosift.pl.1517297478.txt.gz · Last modified: (external edit)