Changeset 34772 for branches/czw_branch/20120906/pstamp/scripts/dquery_finish.pl

Timestamp:

Dec 6, 2012, 6:32:19 PM (14 years ago)

Author:

watersc1

Message:

merge from trunk. Preliminary versions of stacktool/warptool updates and regenerate_background.pl script. The warp code is finished and tested, and I still need to get the stack version resolved.

Location:

branches/czw_branch/20120906/pstamp/scripts

Files:

• . (modified) (1 prop)
• dquery_finish.pl (modified) (2 diffs)

branches/czw_branch/20120906/pstamp/scripts/dquery_finish.pl

@@ -128 +128 @@
     my $job_id = $job->{job_id};
 
+    if ($job->{fault}) {
+        # how do we get this information back to the user?
+        print STDERR "job: $job_id faulted with $job->{fault}\n";
+        next;
+    }
     my $outputBase = $job->{outputBase};
     my $results = "${outputBase}results.txt";
@@ -166 +171 @@
     my $results = shift;
 
-    open IN, "<$results_file" or my_die("failed to open $results_file", $PS_EXIT_UNKNOWN_ERROR);
+    open IN, "<$results_file" or my_die("failed to open $results_file\n", $PS_EXIT_UNKNOWN_ERROR);
 
     foreach my $line (<IN>) {