Changeset 32337 for branches/eam_branches/ipp-20110710/ippScripts/scripts/diff_skycell.pl

Timestamp:

Sep 6, 2011, 11:00:22 AM (15 years ago)

Author:

eugene

Message:

merge changes from trunk

File:

• branches/eam_branches/ipp-20110710/ippScripts/scripts/diff_skycell.pl (modified) (3 diffs)

branches/eam_branches/ipp-20110710/ippScripts/scripts/diff_skycell.pl

@@ -40 +40 @@
 my ($skycell_id, $diff_skyfile_id);
 my ($use_convolved);
+my $zaplog = 0;
+
 GetOptions(
     'diff_id=s'         => \$diff_id, # Diff identifier
@@ -55 +57 @@
     'no-op'             => \$no_op, # Don't do any operations?
     'redirect-output'   => \$redirect,
+    'zaplog'            => \$zaplog, # delete any previous log file
 ) or pod2usage( 2 );
 
@@ -82 +85 @@
     $logDest .= '.update';
     # ... well we can just do the dirty work here
+    $ipprc->kill_file($logDest);
+} elsif ($zaplog) {
     $ipprc->kill_file($logDest);
 }