[Bio] / FortyEight / rp_rapid_propagation.pl Repository:
ViewVC logotype

Diff of /FortyEight/rp_rapid_propagation.pl

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

revision 1.3, Wed May 9 20:57:37 2007 UTC revision 1.4, Fri Jun 1 16:26:26 2007 UTC
# Line 15  Line 15 
15    
16  -d $jobdir or die "$0: job dir $jobdir does not exist\n";  -d $jobdir or die "$0: job dir $jobdir does not exist\n";
17    
18    my $hostname = `hostname`;
19    chomp $hostname;
20    
21  my $genome = &FIG::file_head("$jobdir/GENOME_ID");  my $genome = &FIG::file_head("$jobdir/GENOME_ID");
22  chomp $genome;  chomp $genome;
23  $genome =~ /^\d+\.\d+/ or die "$0: Cannnot find genome ID for jobdir $jobdir\n";  $genome =~ /^\d+\.\d+/ or die "$0: Cannnot find genome ID for jobdir $jobdir\n";
# Line 35  Line 38 
38      &fatal("raw genome directory $raw_dir does not exist");      &fatal("raw genome directory $raw_dir does not exist");
39  }  }
40    
41    $meta->set_metadata("rp.hostname", $hostname);
42    
43  #  #
44  # Perform the rapid propagation.  # Perform the rapid propagation.

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3