Changeset 42421 for trunk/ippScripts/scripts/nightly_science.pl

Timestamp:

Mar 18, 2023, 7:42:26 AM (3 years ago)

Author:

tdeboer

Message:

updated desp diff verbosity logging and fixed error related to last chunk time diff

File:

• trunk/ippScripts/scripts/nightly_science.pl (modified) (3 diffs)

trunk/ippScripts/scripts/nightly_science.pl

@@ -1844 +1844 @@
             my $chunk = $db->selectall_arrayref( $input_chunk );
             foreach my $this_chunk (@{ $chunk }) {
-                $this_date = ${ $this_chunk }[0];
-            }
+                my $this_date = ${ $this_chunk }[0];
+            } 
  
             #compute and store some stats for potential on-the-fly desperate diffs
@@ -1868 +1868 @@
                 #The conditions are: uneven nr of warps greater than 3, and the most recent observations is more than $desdiffdt hours old
                 if (($nwarps % 2 != 0) && ($nwarps >= 3) && ($timediff < $desdiffdt)) {
-                    print STDERR "desp_diff_singles: There are potential desperate diffs to be done (nwarps = $nwarps), but the time criterium is not met ($timediff < $desdiffdt).\n";
+                    print STDERR "desp_diff_singles: There are potential desperate diffs to be done (nwarps = $nwarps) for $this_object, but the time criterium is not met ($timediff < $desdiffdt).\n";
                     next;
                 }
                 if (($nwarps % 2 == 0) || ($nwarps == 1) || ($timediff < $desdiffdt)) {
-                    print STDERR "desp_diff_singles: No desperate diffs will be attempted, since the number of warps is less than or equal to two ($nwarps) and/or the time criterium is not met ($timediff < $desdiffdt)\n";
+                    print STDERR "desp_diff_singles: No desperate diffs will be attempted for $this_object, since the number of warps is even, less than two ($nwarps) and/or the time criterium is not met ($timediff < $desdiffdt)\n";
                     next;
                 }
@@ -1963 +1963 @@
            
             } else {       
-                print STDERR "desp_diff_singles: There is a possibility for dirty diffs to be made, but this is not implemeted at the moment\n";            
+                print STDERR "desp_diff_singles: There is a possibility for dirty diffs to be made for $this_object, but this is not implemeted at the moment\n";           
                 #Consider the case of on-the-fly dirty desperate diffs
                 #The conditions are: uneven nr of bad quality warps greater than 3, and the most recent observations is more than $desdiffdt hours old