Added more verbose error messages

CommModule/client.pl

@@ -300,7 +300,7 @@ sub SendHandshaked($)
   SysLog "Shaking hands ...\n" if($debug);
   SendIt("\x02");
 
-  Error "Handshake uncompleted. Connection lost2!\n" if(!scalar($sel->can_read(20)));
+  Error "Handshake uncompleted. Connection lost2! $!\n" if(!scalar($sel->can_read(20)));
   my $data="";
   my $length=read SER,$data,1;
   if($length && $data eq "\x10")
@@ -376,7 +376,7 @@ Error("Tried reading too often\n") if(($tries--)<=0);
 $data="";
 if(!scalar($sel->can_read(5)))
 {
-Error "Handshake uncompleted. Connection lost variant2!\n" ;
+Error "Handshake uncompleted. Connection lost variant3! $!\n" ;
 return;
 }
 $length=read SER,$data,100,0;