簡単なTCPサーバとクライアント:Geekなぺーじ

以下に単純なTCPサーバを示します。 「#!/usr/bin/perl」の行は環境に応じて変更してください。 もし、/usr/bin/perlにperlが無い場合は「#!/usr/local/bin/perl」にあることが多いと思います。 UNIX系環境（Linux含む）では、「which perl」とやるとperlへのパスがわかります。 「which perl」を実行しても無い場合には、perlがインストールされていないかパスが通していないかのどちらかを疑ってみてください。 #!/usr/bin/perl use IO::Socket; $sock0 = new IO::Socket::INET(Listen=>5, LocalAddr=>'localhost', LocalPort=>12345, Proto=>'tcp', Reuse=>1); die "IO::Socket : $