#> perl client.pl client connected to server send pid to server send pid to server send pid to server