Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

Re: How to communicate between port for socket programming

by golux (Hermit)
on Jul 15, 2013 at 23:17 UTC ( #1044472=note: print w/replies, xml ) Need Help??

in reply to How to communicate between port for socket programming

Hi bh_perl,

First, you've already asked the same question here. We've asked you some questions in return that you still haven't answered, such as ...

  1. Do you have access to the server-side code?
  2. Have you tried logging to a local file to see what's happening on the server side?
  3. What happens when you check the return value from the call to recv?
  4. What happens when you inspect $? after calling recv?
  5. How did you obtain the data trace packet? (This from zork42)

It doesn't help to repost your question. Besides which, the code you posted is not the code you ran, because these lines are commented out:

# read the message sent by server. #my $serverdata = <$socket>; #print "Message from Server : $serverdata \n";

and yet your output (impossibly) contains:

Message from Server :

I would suggest you go back to your previous node and think about the suggestions and questions we've already posed.

And please make sure that your output is from the same code posted, otherwise it will make it hard for us to help you.

say  substr+lc crypt(qw $i3 SI$),4,5

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1044472]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (7)
As of 2018-06-21 11:11 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (118 votes). Check out past polls.