IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Oct 2, 2006, 12:16:03 PM (20 years ago)
Author:
Paul Price
Message:

Changing 'exp id' to 'exp tag' throughout, following corresponding change in database.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ippScripts/scripts/detrend_process_imfile.pl

    r9092 r9097  
    1414use Pod::Usage qw( pod2usage );
    1515
    16 my ($det_id, $exp_id, $class, $class_id, $det_type, $input_uri, $output_uri, $no_update);
     16my ($det_id, $exp_tag, $class, $class_id, $det_type, $input_uri, $output_uri, $no_update);
    1717GetOptions(
    1818    'det_id|d=s'        => \$det_id,
    19     'exp_id|e=s'        => \$exp_id,
     19    'exp_tag|e=s'        => \$exp_tag,
    2020    'class=s'           => \$class,     # unused
    2121    'class_id|i=s'      => \$class_id,
     
    2727pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
    2828pod2usage(
    29     -msg => "Required options: --det_id --exp_id --class_id --det_type --input_uri",
     29    -msg => "Required options: --det_id --exp_tag --class_id --det_type --input_uri",
    3030    -exitval => 3,
    3131) unless defined $det_id
    32     and defined $exp_id
     32    and defined $exp_tag
    3333    and defined $class_id
    3434    and defined $det_type
     
    5555
    5656### Output file name --- must match camera configuration!
    57 my $outputRoot =  $exp_id . '.detproc.' . $det_id;
     57my $outputRoot =  $exp_tag . '.detproc.' . $det_id;
    5858my $outputName = $outputRoot . '.' . $class_id ;
    5959my $outputImage = $outputName . '.fits';
     
    8787# Add the processed file to the database
    8888unless ($no_update) {
    89     my $command = "$dettool -addprocessed -det_id $det_id -exp_id $exp_id " .
     89    my $command = "$dettool -addprocessed -det_id $det_id -exp_tag $exp_tag " .
    9090        "-class_id $class_id -recip $recipe -uri $outputImage"; # Command to run dettool
    9191    $command .= " -bg " . $stats->bg_mean();
     
    100100    my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
    101101        run(command => $command, verbose => 1);
    102     die "Unable to perform dettool -addprocessed for $det_id/$exp_id/$class_id: $error_code\n"
     102    die "Unable to perform dettool -addprocessed for $det_id/$exp_tag/$class_id: $error_code\n"
    103103        if not $success;
    104104}
Note: See TracChangeset for help on using the changeset viewer.