while(4)
  {
  last if $break_main_loop;
  my $CLIENT = $SERVER->accept();
  
if( ! $CLIENT )
    {
    rcd_log( "fatal: $SERVER_SSL_TRAP_ERROR" ) if $opt_ssl and $SERVER_SSL_TRAP_ERROR;
    next;
    }

  my $peerhost = $CLIENT->peerhost();
  my $peerport = $CLIENT->peerport();
  my $sockhost = $CLIENT->sockhost();
  my $sockport = $CLIENT->sockport();

  rcd_log( "info: connection from $peerhost:$peerport to $sockhost:$sockport (me)" );
  
  # do the rest