Changeset 31243 for trunk/tools/runcameraexp.pl

Timestamp:

Apr 8, 2011, 10:39:12 AM (15 years ago)

Author:

bills

Message:

add an option to send the outputs to an alternate output directory (for testing)

File:

• trunk/tools/runcameraexp.pl (modified) (3 diffs)

trunk/tools/runcameraexp.pl

@@ -16 +16 @@
 my $dbname = "gpc1";
 my ($cam_id, $update, $redirect, $save_temps, $pretend, $no_verbose);
+my ($outdir);
 
 GetOptions(
@@ -22 +23 @@
     'redirect-output'   => \$redirect,
     'save-temps'        => \$save_temps,
+    'outdir=s'          => \$outdir,
     'update'            => \$update,
     'dbname=s'          => \$dbname,
@@ -55 +57 @@
 
 die "Cannot update when run is not faulted\n" if $update and ! $fault;
+
+if ($outdir) {
+    my $base = basename($path_base);
+    $path_base = "$outdir/$base";
+    print STDERR "changing path_base to $path_base";
+    $update = 0;
+}
 
 my  $run_state;