$SIG{CHLD} = 'IGNORE'; # or arrange to wait at end # Start the server my $server_path = $bin . $server; my $spid = fork; die $! unless defined $spid; exec $server_path or die $! unless $spid; # Start up the client my $client_path = $bin . $client; my $cpid = fork; die $! unless defined $cpid; exec $client_path or die $! unless $cpid;