open (RESULT, "/usr/bin/ssh -l root " . $host . " 'httpd startssl'|");
  while (<RESULT>){
    print $_;
  }
close RESULT;