if (!($inactive)) {
      print " $pt is up\n";
    } else {
      print " $pt is down\n";
    }
    close $call;