Index: trunk/ippScripts/scripts/chip_imfile.pl
===================================================================
--- trunk/ippScripts/scripts/chip_imfile.pl	(revision 16247)
+++ trunk/ippScripts/scripts/chip_imfile.pl	(revision 16308)
@@ -33,17 +33,19 @@
 
 # Parse the command-line arguments
-my ($exp_id, $exp_tag, $chip_id, $class_id, $uri, $camera, $outroot, $dbname, $reduction, $no_update, $no_op);
+my ( $exp_id, $exp_tag, $chip_id, $class_id, $uri, $camera, $outroot, $dbname, $reduction, $verbose,
+     $no_update, $no_op );
 GetOptions(
-	   'exp_id=s'      => \$exp_id,    # Exposure identifier		       
-	   'exp_tag=s'     => \$exp_tag,   # Exposure identifier		       
-	   'chip_id=s'     => \$chip_id,   # Chiptool identifier		       
-	   'class_id=s'    => \$class_id,  # Class identifier		       
-	   'uri|u=s'       => \$uri,       # Input FITS file		       
-	   'camera|c=s'    => \$camera,	   # Camera			       
+	   'exp_id=s'      => \$exp_id,    # Exposure identifier
+	   'exp_tag=s'     => \$exp_tag,   # Exposure identifier
+	   'chip_id=s'     => \$chip_id,   # Chiptool identifier
+	   'class_id=s'    => \$class_id,  # Class identifier
+	   'uri|u=s'       => \$uri,       # Input FITS file
+	   'camera|c=s'    => \$camera,	   # Camera
 	   'outroot|w=s'   => \$outroot,   # output file base name
 	   'dbname|d=s'    => \$dbname,    # Database name
-	   'reduction=s'   => \$reduction, # Reduction class		       
-	   'no-update'     => \$no_update, # Don't update the database?	       
-	   'no-op'         => \$no_op,	   # Don't do any operations?             
+	   'reduction=s'   => \$reduction, # Reduction class
+	   'verbose'       => \$verbose,   # Print to stdout
+	   'no-update'     => \$no_update, # Don't update the database?
+	   'no-op'         => \$no_op,	   # Don't do any operations?
 	   ) or pod2usage( 2 );
 
@@ -70,6 +72,6 @@
 # values to extract from output metadata and the stats to calculate
 # XXX commented-out entries are not yet defined in the output files
-my $STATS = 
-   [   
+my $STATS =
+   [
        #          PPSTATS KEYWORD         STATISTIC          CHIPTOOL FLAG
        { name => "ROBUST_MEDIAN",  type => "mean",  flag => "-bg",             dtype => "float" },
@@ -103,7 +105,7 @@
 my $chiptool = can_run('chiptool') or (warn "Can't find chiptool" and $missing_tools = 1);
 my $ppImage = can_run('ppImage') or (warn "Can't find ppImage" and $missing_tools = 1);
-if ($missing_tools) { 
+if ($missing_tools) {
     warn("Can't find required tools.");
-    exit($PS_EXIT_CONFIG_ERROR); 
+    exit($PS_EXIT_CONFIG_ERROR);
 }
 
@@ -140,5 +142,5 @@
 
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-	run(command => $command, verbose => 1);
+	run(command => $command, verbose => $verbose);
     unless ($success) {
 	$error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
@@ -185,5 +187,5 @@
 unless ($no_update) {
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-	run(command => $command, verbose => 1);
+	run(command => $command, verbose => $verbose);
     unless ($success) {
 	$error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);