Index: trunk/ippScripts/scripts/lap_science.pl
===================================================================
--- trunk/ippScripts/scripts/lap_science.pl	(revision 31922)
+++ trunk/ippScripts/scripts/lap_science.pl	(revision 31939)
@@ -581,5 +581,5 @@
 	if ($needs_qstack < $total_exposures * $qstack_threshold) { # Drop any exposures that are requiring the qstack
 	    print "STATUS: Insufficient unpaired exposures to justify quickstack.  Dropping unpaired exposures\n";
-	    foreach $exposure (@lonely_exposures) {
+	    foreach my $exposure (@lonely_exposures) {
 		$exposure->{data_state} = 'drop';
 		&update_this_exposure($exposure);
@@ -640,5 +640,5 @@
     my $warps = '';
     foreach $exposure (@$exposures) {
-	if (($exposure->{data_state} != 'drop')&&
+	if (($exposure->{data_state} ne 'drop')&&
 	    (S64_IS_NOT_NULL($exposure->{warp_id}))) {
 	    $warps .= " -warp_id $exposure->{warp_id} ";
@@ -657,5 +657,5 @@
     $command .= " -pretend " if defined $debug;
     $command .= " -dbname $dbname " if defined $dbname;
-    $command .= " -definebyquery -select_label $label -select_skycell_id ${proj_cell}.% -select_filter $filter ";
+    $command .= " -definebyquery -select_label ${label}% -select_skycell_id ${proj_cell}.% -select_filter $filter ";
     $command .= " -set_label ${label} -set_data_group $data_group ";
     $command .= "  -set_workdir $workdir  -set_dist_group NODIST ";
@@ -719,5 +719,5 @@
     my $warps = '';
     foreach $exposure (@$exposures) {
-	if (($exposure->{data_state} != 'drop')&&
+	if (($exposure->{data_state} ne 'drop')&&
 	    (S64_IS_NOT_NULL($exposure->{magicked}))&&
 	    (S64_IS_NOT_NULL($exposure->{warp_id}))) {
@@ -737,5 +737,5 @@
     $command .= " -pretend " if defined $debug;
     $command .= " -dbname $dbname " if defined $dbname;
-    $command .= " -definebyquery -select_label $label -select_skycell_id ${proj_cell}.% -select_filter $filter ";
+    $command .= " -definebyquery -select_label ${label}% -select_skycell_id ${proj_cell}.% -select_filter $filter ";
     $command .= " -set_label ${label} -set_workdir $workdir -set_data_group $data_group ";
     $command .= " -min_num 2 -set_reduction THREEPI_STACK -set_dist_group $exposure->{dist_group} ";