Changeset 14411 for trunk/ippScripts/scripts/ipp_serial_detrend.pl
- Timestamp:
- Aug 6, 2007, 11:04:32 AM (19 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/ipp_serial_detrend.pl (modified) (9 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/ipp_serial_detrend.pl
r14170 r14411 40 40 # Process raw imfiles 41 41 { 42 my $command = "$dettool -toprocessedimfile ";42 my $command = "$dettool -toprocessedimfile -dbname $dbname"; 43 43 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 44 44 run( command => $command, verbose => 1 ); … … 84 84 # Process raw exposures 85 85 { 86 my $command = "$dettool -toprocessedexp ";86 my $command = "$dettool -toprocessedexp -dbname $dbname"; 87 87 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 88 88 run( command => $command, verbose => 1 ); … … 109 109 # Stack 110 110 { 111 my $command = "$dettool -tostacked ";111 my $command = "$dettool -tostacked -dbname $dbname"; 112 112 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 113 113 run( command => $command, verbose => 1 ); … … 136 136 # Calculate normalisation 137 137 { 138 my $command = "$dettool -tonormalizedstat ";138 my $command = "$dettool -tonormalizedstat -dbname $dbname"; 139 139 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 140 140 run( command => $command, verbose => 1 ); … … 159 159 # Apply normalisation 160 160 { 161 my $command = "$dettool -tonormalize ";161 my $command = "$dettool -tonormalize -dbname $dbname"; 162 162 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 163 163 run( command => $command, verbose => 1 ); … … 186 186 # Examine normalised exposure 187 187 { 188 my $command = "$dettool -tonormalizedexp ";188 my $command = "$dettool -tonormalizedexp -dbname $dbname"; 189 189 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 190 190 run( command => $command, verbose => 1 ); … … 213 213 # Get residuals 214 214 { 215 my $command = "$dettool -toresidimfile ";215 my $command = "$dettool -toresidimfile -dbname $dbname"; 216 216 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 217 217 run( command => $command, verbose => 1 ); … … 262 262 # Reject based on imfiles 263 263 { 264 my $command = "$dettool -toresidexp ";264 my $command = "$dettool -toresidexp -dbname $dbname"; 265 265 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 266 266 run( command => $command, verbose => 1 ); … … 288 288 # Reject based on exposures 289 289 { 290 my $command = "$dettool -residdetrun ";290 my $command = "$dettool -residdetrun -dbname $dbname"; 291 291 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 292 292 run( command => $command, verbose => 1 );
Note:
See TracChangeset
for help on using the changeset viewer.
