戻り値（）perlの

Question

内の関数は、私はPerlで非ブロッキングUDPソケットは、この方法で作成した

my $my_sock = IO::Socket::INET->new(LocalPort => $MY_PORT, 
            Proto => 'udp', 
        Blocking => '0') or die "socket: $@"; 

のrecvコールは、私が知っている必要があり

my $retValue = $sock->recv($my_message, 64); 

ある a）のときが残っているデータがない b）データがある場合、読み取ったデータの量 c）任意のエラー条件

驚いたことに、私は見たことがありませんperldocのrecvの戻り値私はそれを自分で試してみましたが、recvは（a）のundefを返します.bは印刷できない文字です

これは基本的な問題です。しかし、私はまだグーグルやスタックオーバーフローに関する情報を見つけることができません。どんな入力でも大丈夫です。

Answer 1

perldocによると、recvはSOCKETのプロトコルがこれをサポートしていれば送信者のアドレスを返し、そうでなければ空文字列を返します。エラーは、未定義の値を返します。

undefを取得している場合、これはrecvにエラーが発生していることを意味します。

あなたのコード内のエラーが次の行にされています

$retValue = $sock->recv($my_message, 64); 

のrecv関数のプロトタイプは次のとおりです。はperldocによると

recv SOCKET,SCALAR,LENGTH,FLAGS 

、RECVは「へのデータの長さの文字を受信しようと指定されたSOCKETファイルハンドルからの変数SCALAR。SCALARは実際に読み取られた長さに伸縮します。

試してみてください。私はすべての情報を得たところ

$retvalue = recv($sock, $my_message, 64) 

これは、次のとおりです。 http://perldoc.perl.org/functions/recv.html

Answer 2

recvによって返される値は、データが

my $hispaddr = $sock->recv($my_message, 64); 

if ($retValue) { 
    my ($port, $iaddr); 
    ($port, $iaddr) = sockaddr_in($hispaddr); 
    printf("address %s\n", inet_ntoa($iaddr)); 
    printf("port %s\n", $port); 
    printf("name %s\n", gethostbyaddr($iaddr, AF_INET)); 
} 

から受信したことをアドレスとポートです

返されるデータの長さは、

length($my_message);