$ perl test_ipc_perlssh.pl 
1
[killed sshd on remote]
Connection to somehost closed by remote host.
[pressed enter]

$