#include <unistd.h>
#include <stdlib.h>
#include <string.h>
#include "pvm3.h"
int main(void){
  int ptid;
  char buf[100];
  ptid = pvm_parent();
  strcpy(buf, "hello, world from ");
  gethostname(buf + strlen(buf), 64);
  pvm_initsend(PvmDataDefault);
  pvm_pkstr(buf);
  pvm_send(ptid, 1);
  pvm_exit();
  exit(0);
}