Changeset 18562 for trunk/ippScripts/scripts/warp_overlap.pl

Timestamp:

Jul 15, 2008, 10:33:17 AM (18 years ago)

Author:

eugene

Message:

implement redirect-output everywhere; cleanup logfile names; rename detrend_resid.pl to detrend_resid_imfile.pl; rename detrend_reject_imfile.pl to detrend_resid_exp.pl

File:

• trunk/ippScripts/scripts/warp_overlap.pl (modified) (2 diffs)

trunk/ippScripts/scripts/warp_overlap.pl

@@ -27 +27 @@
 my $ipprc = PS::IPP::Config->new(); # IPP configuration
 
-my ($warp_id, $camera, $tess_dir, $dbname, $verbose, $no_update, $no_op, $save_temps);
+my ($warp_id, $camera, $tess_dir, $dbname, $verbose, $no_update, $no_op, $logfile, $save_temps);
 GetOptions(
     'warp_id|i=s'       => \$warp_id, # Warp identifier
@@ -36 +36 @@
     'no-update'         => \$no_update, # Don't update the database?
     'no-op'             => \$no_op, # Don't do any operations
+    'logfile=s'         => \$logfile,
     'save-temps'        => \$save_temps, # Save temporary files?
 ) or pod2usage( 2 );
+
+$ipprc->redirect_output($logfile) if $logfile;
 
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;