[Bio] / Sprout / SimLoad.pl Repository:
ViewVC logotype

Diff of /Sprout/SimLoad.pl

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

revision 1.9, Thu Feb 2 21:30:05 2006 UTC revision 1.11, Thu Dec 6 14:58:03 2007 UTC
# Line 73  Line 73 
73  input files in the C</Users/fig/BlastData> directory tree  input files in the C</Users/fig/BlastData> directory tree
74  and run at a trace level of 3.  and run at a trace level of 3.
75    
76  C<< SimLoad -trace=3 /Users/fig/BlastData >>      SimLoad -trace=3 /Users/fig/BlastData
77    
78  The following command line converts the input files in  The following command line converts the input files in
79  the default directory into load files but does not load  the default directory into load files but does not load
80  the database and runs at a trace level of 2.  the database and runs at a trace level of 2.
81    
82  C<< SimLoad -load=no >>      SimLoad -load=no
83    
84  =head2 Input Directory  =head2 Input Directory
85    
# Line 316  Line 316 
316  my $inDirectoryTree = ($arguments[0] ? Cwd::abs_path($arguments[0]) : "$FIG_Config::data/CloseStrainSets");  my $inDirectoryTree = ($arguments[0] ? Cwd::abs_path($arguments[0]) : "$FIG_Config::data/CloseStrainSets");
317  # Check to see if we need to create the database.  # Check to see if we need to create the database.
318  if ($options->{createDB}) {  if ($options->{createDB}) {
319      Trace("Creating database.") if T(2);      my $dbname = SimBlocks::DBName();
320      DBKernel::CreateDB($FIG_Config::simBlocksDB);      Trace("Creating database $dbname.") if T(2);
321        DBKernel::CreateDB($dbname);
322  }  }
323  # Get the output directory.  # Get the output directory.
324  my $outDirectory = $FIG_Config::simBlocksData;  my $outDirectory = $FIG_Config::simBlocksData;
325    # Default it if it isn't present.
326    if (! $outDirectory) {
327        $outDirectory = "$FIG_Config::fig/BlockData";
328    }
329  # Insure that it exists.  # Insure that it exists.
330  if (! -d $outDirectory) {  if (! -d $outDirectory) {
331      Trace("Creating output directory $outDirectory.") if T(2);      Trace("Creating output directory $outDirectory.") if T(2);

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.11

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3