IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 39985


Ignore:
Timestamp:
Feb 24, 2017, 4:59:09 PM (9 years ago)
Author:
watersc1
Message:

Merge from ipptest tag of rawcheck.pl prior to adding pre-scan code.

File:
1 edited

Legend:

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

    r39942 r39985  
    4949if ($save_log) {
    5050    my $time = time();
    51     my $logDest = "neb://any/raw_check/exp_${exp_id}.${time}";
     51    my $logDest = "neb://any/raw_check/exp_${exp_id}";
    5252    my $ipprc = PS::IPP::Config->new( "GPC1" ) or die "Could not create config object.\n";
    53     $ipprc->redirect_output($logDest) or die "Could not redirect output to logfile ${logDest}\n";
     53    $ipprc->redirect_to_logfile($logDest) or die "Could not redirect output to logfile ${logDest}\n";
    5454}
    5555
     
    118118
    119119for ($i = 0; $i <= 15; $i++) {
    120     if ($i == 6) { next; } # This isn't "offsite", it's with the rest of the maui cluster.
     120    my $loc = 'OFFSITE';
     121    if ($i == 6) {
     122        $loc = 'MRTCB';
     123    } # This isn't "offsite", it's with the rest of the maui cluster.
    121124    if ($i == 9) { next; } # Not online
    122125
    123126    my $vol = sprintf("ippb%02d.0",$i);
    124     $volume_map{$vol} = 'OFFSITE';
     127    $volume_map{$vol} = $loc;
    125128    $vol = sprintf("ippb%02d.1",$i);
    126     $volume_map{$vol} = 'OFFSITE';
     129    $volume_map{$vol} = $loc;
    127130    if ($i <= 6) {
    128131        $vol = sprintf("ippb%02d.2",$i);
    129         $volume_map{$vol} = 'OFFSITE';
     132        $volume_map{$vol} = $loc;
    130133    }
    131134}   
     
    168171# die;
    169172# Pull data from the gpc1 database about the exposure to consider
     173
    170174my $verbose = 0;
    171175my $mdcParser = PS::IPP::Metadata::Config->new;
Note: See TracChangeset for help on using the changeset viewer.