if (!($pid = fork))
 {

   # child process -- returns with 0 as pid

   exec('/root/Phase2/OperatorView4/recurse5.pl', $btnMpIp);

 } else { # we are in parent process; Store the process ID of the child in the hash

   $hash_ref->{$btnMpIp}->{processid} = $pid;

 }

}

##</code><code>##

Xlib: unexpected async reply (sequence 0x8d)!
X Error of failed request: BadIDChoice (invalid resource ID chosen for
this connection)
Major opcode of failed request: 53 (X_CreatePixmap)
Resource id in failed request: 0x480000d
Serial number of failed request: 145
Current serial number in output stream: 143