IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 10700


Ignore:
Timestamp:
Dec 13, 2006, 3:34:19 PM (19 years ago)
Author:
jhoblitt
Message:

preserve exit status in END block

Location:
trunk
Files:
14 edited

Legend:

Unmodified
Added
Removed

  • trunk/ippScripts/scripts/detrend_norm_apply.pl

    r10534 r10700  
    123123}
    124124
    125 END { system("sync") == 0 or die "failed to execute sync: $!" }
     125END {
     126    my $status = $?;
     127    system("sync") == 0
     128        or die "failed to execute sync: $!" ;
     129    $? = $status;
     130}

  • trunk/ippScripts/scripts/detrend_norm_calc.pl

    r10297 r10700  
    158158}
    159159
    160 END { system("sync") == 0 or die "failed to execute sync: $!" }
     160END {
     161    my $status = $?;
     162    system("sync") == 0
     163        or die "failed to execute sync: $!" ;
     164    $? = $status;
     165}

  • trunk/ippScripts/scripts/detrend_norm_exp.pl

    r10534 r10700  
    147147}
    148148
    149 END { system("sync") == 0 or die "failed to execute sync: $!" }
     149END {
     150    my $status = $?;
     151    system("sync") == 0
     152        or die "failed to execute sync: $!" ;
     153    $? = $status;
     154}
    150155
    151156__END__

  • trunk/ippScripts/scripts/detrend_process_exp.pl

    r10534 r10700  
    147147}
    148148
    149 END { system("sync") == 0 or die "failed to execute sync: $!" }
     149END {
     150    my $status = $?;
     151    system("sync") == 0
     152        or die "failed to execute sync: $!" ;
     153    $? = $status;
     154}
    150155
    151156__END__

  • trunk/ippScripts/scripts/detrend_process_imfile.pl

    r10534 r10700  
    128128}
    129129
    130 END { system("sync") == 0 or die "failed to execute sync: $!" }
     130END {
     131    my $status = $?;
     132    system("sync") == 0
     133        or die "failed to execute sync: $!" ;
     134    $? = $status;
     135}
    131136
    132137__END__

  • trunk/ippScripts/scripts/detrend_reject_exp.pl

    r10537 r10700  
    215215}
    216216
    217 END { system("sync") == 0 or die "failed to execute sync: $!" }
     217END {
     218    my $status = $?;
     219    system("sync") == 0
     220        or die "failed to execute sync: $!" ;
     221    $? = $status;
     222}
    218223
    219224# Retrieve the requested rejection limit, dying if not extant

  • trunk/ippScripts/scripts/detrend_reject_imfile.pl

    r10538 r10700  
    247247}
    248248
    249 END { system("sync") == 0 or die "failed to execute sync: $!" }
     249END {
     250    my $status = $?;
     251    system("sync") == 0
     252        or die "failed to execute sync: $!" ;
     253    $? = $status;
     254}
    250255
    251256

  • trunk/ippScripts/scripts/detrend_stack.pl

    r10534 r10700  
    133133}
    134134
    135 END { system("sync") == 0 or die "failed to execute sync: $!" }
     135END {
     136    my $status = $?;
     137    system("sync") == 0
     138        or die "failed to execute sync: $!" ;
     139    $? = $status;
     140}
    136141
    137142__END__

  • trunk/ippScripts/scripts/inject.pl

    r10519 r10700  
    128128}
    129129
     130END {
     131    my $status = $?;
     132    system("sync") == 0
     133        or die "failed to execute sync: $!" ;
     134    $? = $status;
     135}
     136
    130137
    131138__END__

  • trunk/ippScripts/scripts/mdc2list.pl

    r9446 r10700  
    7070}
    7171
    72 END { system("sync") == 0 or die "failed to execute sync: $!" }
     72END {
     73    my $status = $?;
     74    system("sync") == 0
     75        or die "failed to execute sync: $!" ;
     76    $? = $status;
     77}

  • trunk/ippScripts/scripts/phase2.pl

    r10534 r10700  
    112112}
    113113
    114 END { system("sync") == 0 or die "failed to execute sync: $!" }
     114END {
     115    my $status = $?;
     116    system("sync") == 0
     117        or die "failed to execute sync: $!" ;
     118    $? = $status;
     119}
    115120
    116121__END__

  • trunk/ippScripts/scripts/phase3.pl

    r10534 r10700  
    152152}
    153153
    154 END { system("sync") == 0 or die "failed to execute sync: $!" }
     154END {
     155    my $status = $?;
     156    system("sync") == 0
     157        or die "failed to execute sync: $!" ;
     158    $? = $status;
     159}
    155160
    156161__END__

  • trunk/ippTools/scripts/dettest.sh

    r9821 r10700  
    88
    99#dettool -definebyquery -det_type flat -set_exp_type fooflat -set_filter foo -set_airmass 10 -set_exp_time 30.0 -set_ccd_temp 100 -set_posang 360 -set_object iobject || exit 1
    10 dettool -definebyquery -det_type flat -set_exp_type fooflat -set_filter foo -set_airmass 10 -set_exp_time 30.0 -set_object iobject || exit 1
     10det_id=`dettool -definebyquery -det_type flat -set_exp_type fooflat -set_filter foo -set_airmass 10 -set_exp_time 30.0 -set_object iobject -simple | cut -f1 -d" "` || exit 1
     11
    1112dettool -raw || exit 1
    1213
    1314for ID in `seq 0 3` ; do
    14     dettool -addprocessedimfile -det_id $det_id -exp_tag t10 -class_id $ID -uri file://proc-$ID -recip myrecip -bg 1 -bg_stdev 1 -bg_mean_stdev 1 || exit 1
     15    dettool -addprocessedimfile -det_id $det_id -exp_tag t11.2 -class_id $ID -uri file://proc-$ID -recip myrecip -bg 1 -bg_stdev 1 -bg_mean_stdev 1 || exit 1
    1516done;
    1617
    17 for ID in `seq 0 3` ; do
    18     dettool -addprocessedimfile -det_id $det_id -exp_tag t11 -class_id $ID -uri file://proc-$ID -recip myrecip -bg 1 -bg_stdev 1 -bg_mean_stdev 1 || exit 1
    19 done;
     18#for ID in `seq 0 3` ; do
     19#    dettool -addprocessedimfile -det_id $det_id -exp_tag t11 -class_id $ID -uri file://proc-$ID -recip myrecip -bg 1 -bg_stdev 1 -bg_mean_stdev 1 || exit 1
     20#done;
     21
    2022
    2123dettool -tostacked || exit 1
    … …  
    4244
    4345for ID in `seq 0 3` ; do
    44     dettool -addresidimfile -det_id $det_id -exp_tag t10 -class_id $ID -recip myrecip -bg 1 -bg_stdev 1 -bg_mean_stdev 1 -uri file://resid-$ID || exit 1
    45 done;
    46 for ID in `seq 0 3` ; do
    47     dettool -addresidimfile -det_id $det_id -exp_tag t11 -class_id $ID -recip myrecip -bg 1 -bg_stdev 1 -bg_mean_stdev 1 -uri file://resid-$ID || exit 1
     46    dettool -addresidimfile -det_id $det_id -exp_tag t11.2 -class_id $ID -recip myrecip -bg 1 -bg_stdev 1 -bg_mean_stdev 1 -uri file://resid-$ID || exit 1
    4847done;
    4948
    5049dettool -toresidexp || exit 1
    51 dettool -addresidexp -det_id $det_id -exp_tag t10 -recip myrecipe -bg 1 -bg_stdev 2 -bg_mean_stdev 3 -b1_uri jpeg1 -b2_uri jpeg2  || exit 1
    52 dettool -addresidexp -det_id $det_id -exp_tag t11 -recip myrecipe -bg 1 -bg_stdev 2 -bg_mean_stdev 3 -b1_uri jpeg1 -b2_uri jpeg2  -reject || exit 1
     50dettool -addresidexp -det_id $det_id -exp_tag t11.2 -recip myrecipe -bg 1 -bg_stdev 2 -bg_mean_stdev 3 -b1_uri jpeg1 -b2_uri jpeg2  || exit 1
     51#dettool -addresidexp -det_id $det_id -exp_tag t11.2 -recip myrecipe -bg 1 -bg_stdev 2 -bg_mean_stdev 3 -b1_uri jpeg1 -b2_uri jpeg2  -reject || exit 1
    5352
    5453dettool -residdetrun || exit 1
    5554dettool -residexp || exit 1
    5655dettool -updateresidexp -det_id $det_id -iteration 0 -recip yourrecipe || exit 1
    57 dettool -updateresidexp -det_id $det_id -iteration 0 -exp_tag t10 -reject || exit 1
    58 dettool -updateresidexp -det_id $det_id -iteration 0 -exp_tag t11 || exit 1
     56dettool -updateresidexp -det_id $det_id -iteration 0 -exp_tag t11.2 -reject || exit 1
     57dettool -updateresidexp -det_id $det_id -iteration 0 -exp_tag t11.2 || exit 1
    5958
    6059dettool -adddetrunsummary -det_id $det_id -iteration 0 -bg 1 -bg_stdev 2 -bg_mean_stdev 3 -accept || exit 1

  • trunk/ippTools/scripts/regtest.sh

    r10117 r10700  
    2424done;
    2525
    26 $p0tool -updateexp -exp_tag $exp_tag1 -filter r -airmass 10 -ra 1 -decl 2 -exp_type bias -exp_time 0 -bg 10 -bg_stdev 1 -bg_mean_stdev 10 -alt 10 -az 10 -ccd_temp 45 -posang 10 -object dog -dateobs "2006-10-20T10:10:10Z" -label foobar $* || exit 1
     26#$p0tool -updateexp -exp_tag $exp_tag1 -filter r -airmass 10 -ra 1 -decl 2 -exp_type bias -exp_time 0 -bg 10 -bg_stdev 1 -bg_mean_stdev 10 -alt 10 -az 10 -ccd_temp 45 -posang 10 -object dog -dateobs "2006-10-20T10:10:10Z" -label foobar $* || exit 1
    2727
    2828for ID in `seq 0 3`; do
Note: See TracChangeset for help on using the changeset viewer.