chomp($ds_mach=`cat ${CONFIG}/BigIron`);
chomp($dr_mach=`cat ${CONFIG}/BigIronDR`);

system("/usr/sbin/ping $ds_mach >/dev/null 2>/dev/null");
if ( ($? >> 8) eq 0 ) {
        $id = "pmdss\@$ds_mach";
}
else {
        system("/usr/sbin/ping $dr_mach >/dev/null 2>/dev/null");


chomp($ds_mach=`cat ${CONFIG}/BigIron`);
chomp($dr_mach=`cat ${CONFIG}/BigIronDR`);

system("/usr/sbin/ping $ds_mach >/dev/null 2>/dev/null");