Changeset 20435 for trunk/tools/stack_inputs.pl

Timestamp:

Oct 28, 2008, 9:30:01 AM (18 years ago)

Author:

Paul Price

Message:

Add option to generate the input MDC file.

File:

• trunk/tools/stack_inputs.pl (modified) (3 diffs)

trunk/tools/stack_inputs.pl

@@ -49 +49 @@
 
 # Query to run
-my $sql = "SELECT warpSkyfile.path_base"
-    " FROM stackRun"
-    " JOIN stackInputSkyfile USING(stack_id)"
-    " JOIN warpSkyfile USING(warp_id, skycell_id)"
+my $sql = "SELECT warpSkyfile.path_base" .
+    " FROM stackRun" .
+    " JOIN stackInputSkyfile USING(stack_id)" .
+    " JOIN warpSkyfile USING(warp_id, skycell_id)" .
     " WHERE stack_id = $stack_id";
 
@@ -69 +69 @@
 foreach my $warp_path ( @$warps ) {
     print $list "INPUT METADATA\n" if defined $input;
-    foreach my $type ( keys @{EXTENSIONS()} ) {
+    foreach my $type ( keys %{EXTENSIONS()} ) {
         my $ext = ${EXTENSIONS()}{$type}; # Extension
         my $neb = "$warp_path$ext"; # Nebulous file
@@ -78 +78 @@
         print $list "\t$type\tSTR\t$target\n" if defined $input;
     }
-    print $list "END\n\n" if defined $input;
+    print $list "WEIGHTING\tF32\t1.0\nEND\n\n" if defined $input;
 }