print( scalar localtime() . "About to connect\n" ); 
  $connected = connect(SOCK, $paddr);
    print( scalar localtime() . "Finished connect\n" );