Changeset 18048 for trunk/ippScripts/scripts/detrend_norm_apply.pl

Timestamp:

Jun 10, 2008, 8:46:59 AM (18 years ago)

Author:

bills

Message:

Resolve log file and redirect output in scripts not in tasks

File:

• trunk/ippScripts/scripts/detrend_norm_apply.pl (modified) (4 diffs)

trunk/ippScripts/scripts/detrend_norm_apply.pl

@@ -26 +26 @@
 # Parse the command-line
 my ( $det_id, $iter, $class_id, $value, $input_uri, $camera, $det_type, $outroot, $dbname, $verbose,
-     $no_update, $no_op );
+     $no_update, $no_op, $redirect );
 GetOptions(
     'det_id|d=s'        => \$det_id,     # Detrend ID
@@ -40 +40 @@
     'no-update'         => \$no_update,  # Don't update the database
     'no-op'             => \$no_op,      # Don't do any operations
+    'redirect-output'   => \$redirect,   # send output from script to LOG.IMFILE
     ) or pod2usage( 2 );
 
@@ -56 +57 @@
 $ipprc->define_camera($camera);
 
+my $logDest = $ipprc->filename("LOG.IMFILE", $outroot, $class_id) 
+        or &my_die("Missing entry from camera config", $det_id, $iter, $class_id, $PS_EXIT_CONFIG_ERROR);
+$ipprc->redirect_output($logDest) if $redirect;
+
 my $RECIPE_PPIMAGE = 'PPIMAGE_N'; # Recipe to use with ppImage
 my $RECIPE_PPSTATS = 'CHIPSTATS'; # Recipe to use with ppStats
@@ -100 +105 @@
 my $statsName = $ipprc->filename("PPIMAGE.STATS", $outroot, $class_id) or &my_die("Missing entry from camera config", $det_id, $iter, $class_id, $PS_EXIT_CONFIG_ERROR);
 my $traceDest = $ipprc->filename("TRACE.IMFILE",  $outroot, $class_id) or &my_die("Missing entry from camera config", $det_id, $iter, $class_id, $PS_EXIT_CONFIG_ERROR);
-my $logDest   = $ipprc->filename("LOG.IMFILE",    $outroot, $class_id) or &my_die("Missing entry from camera config", $det_id, $iter, $class_id, $PS_EXIT_CONFIG_ERROR);
 
 # Run normalisation