Changeset 19545 for trunk/ippScripts/scripts/diff_skycell.pl

Timestamp:

Sep 12, 2008, 4:20:57 PM (18 years ago)

Author:

eugene

Message:

convert chiphost tables to ipphosts tables, add lookups for skycellID to host, add in the redirect-output option to stack and diff

File:

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

trunk/ippScripts/scripts/diff_skycell.pl

@@ -25 +25 @@
 use Pod::Usage qw( pod2usage );
 
-my ($diff_id, $dbname, $threads, $outroot, $verbose, $no_update, $no_op);
+my ($diff_id, $dbname, $threads, $outroot, $verbose, $no_update, $no_op, $redirect);
 GetOptions(
     'diff_id|d=s'       => \$diff_id, # Diff identifier
@@ -34 +34 @@
     'no-update'         => \$no_update, # Don't update the database?
     'no-op'             => \$no_op, # Don't do any operations?
+    'redirect-output'   => \$redirect,
 ) or pod2usage( 2 );
 
@@ -42 +43 @@
           ) unless defined $diff_id
     and defined $outroot;
+
+# XXX camera is not known here; cannot use filerules...
+# my $logDest = $ipprc->filename("LOG.EXP", $outroot);
+
+my $logDest = "$outroot.log";
+$ipprc->redirect_output($logDest) if $redirect;
 
 my $STATS =
@@ -183 +190 @@
 my $outputStats = $ipprc->filename("SKYCELL.STATS", $outroot);
 my $traceDest = $ipprc->filename("TRACE.EXP", $outroot);
-my $logDest = $ipprc->filename("LOG.EXP", $outroot);
 
 # Perform subtraction