if( $Pipe = new Win32::Pipe( $PipeName ) ) { # talk... } else { # continue polling. The client's call failed. }