Index: trunk/ippScripts/scripts/detrend_reject_imfile.pl
===================================================================
--- trunk/ippScripts/scripts/detrend_reject_imfile.pl	(revision 11316)
+++ trunk/ippScripts/scripts/detrend_reject_imfile.pl	(revision 11319)
@@ -35,5 +35,5 @@
 	   'camera=s'          => \$camera,
 	   'filter=s'          => \$filter,
-	   'reject'            => \$reject
+	   'reject'            => \$reject,
 	   'dbname|d=s'        => \$dbname, # Database name
 	   'workdir|w=s'       => \$workdir, # Working directory, for output files
@@ -75,5 +75,5 @@
 	run(command => $command, verbose => 1);
     unless ($success) {
-	$error_code >> 8;
+	$error_code = $error_code >> 8;
 	warn("Unable to perform dettool -residimfile: $error_code\n");
 	exit($error_code);
@@ -125,5 +125,5 @@
 	run(command => $command, verbose => 1);
     unless ($success) {
-	$error_code >> 8;
+	$error_code = $error_code >> 8;
 	&my_die("Unable to run ppImage: $error_code", $det_id, $iter, $exp_tag, $error_code);
     }
@@ -137,5 +137,5 @@
 	run(command => $command, verbose => 1);
     unless ($success) {
-	$error_code >> 8;
+	$error_code = $error_code >> 8;
 	&my_die("Unable to run ppImage: $error_code", $det_id, $iter, $exp_tag, $error_code);
     }
@@ -274,5 +274,5 @@
 	run(command => $command, verbose => 1);
     unless ($success) {
-	$error_code >> 8;
+	$error_code = $error_code >> 8;
 	warn("Unable to perform dettool -addresidexp: $error_code\n");
 	exit($error_code);
@@ -300,5 +300,5 @@
 
     warn($msg);
-    if ($det_id and $iteration and $exp_tag) {
+    if ($det_id and $iter and $exp_tag) {
 	my $command = "$dettool -addresidexp -det_id $det_id -iteration $iter -exp_tag $exp_tag -code $exit_code";
 	$command .= " -dbname $dbname" if defined $dbname;