ネット:: EasyTCP.

Net :: EasyTCPは、安全な帯域幅にやさしいTCP / IPクライアントとサーバーを簡単に作成できるPerlモジュールです。
今すぐダウンロード

ネット:: EasyTCP. ランキングとまとめ

広告

  • Rating:
  • ライセンス:
  • Perl Artistic License
  • 価格:
  • FREE
  • 出版社名:
  • Mina Naguib
  • 出版社のWebサイト:
  • http://search.cpan.org/mnaguib/EasyTCP-0.26/EasyTCP.pm

ネット:: EasyTCP. タグ


ネット:: EasyTCP. 説明

Net :: EasyTCPは、安全な帯域幅に優しいTCP / IPクライアントとサーバーを簡単に作成できるPerlモジュールです。 Net :: EasyTCPは、安全な帯域幅に優しいTCP / IPクライアントを簡単に作成できるPerlモジュールです。インタフェース・サーバー・モード・イベント・ベースのコールバック・すべての一般的なトランスポート問題の世話をするための内部プロトコル・透明暗号化・透明Compresserverの例：Net :: EasyTCPを使用します。 ##サーバーオブジェクトを作成する＃$ server = new net :: easytcp（mode => "server"、port => 2345、）|| 「サーバーの作成エラー：$ @ n」; ##既知のイベントで電話をかけるためのコールバックについて教えてください＃$ server-> setCallback（data => gotdata、connect => connected、disconnect =>切断）|| 「コールバックの設定エラー：$ @ n」; ##サーバーを起動＃$ server-> start（）|| 「サーバーの起動エラー：$ @ n」; ##クライアントが私たちのデータを送信したとき＃sub gotdata {my $ client = shift; My $ SERIAL = $ CLIENT-> SERIAL（）; My $ DATA = $ CLIENT-> DATA（）; 「クライアント$シリアルを送信し、それを再度送信してください」を印刷します。 $ client-> send（$ DATA）|| 「クライアントへの送信エラー：$ @ n」; （$ DATA EQ "QUIT"）{$ client-> close（）|| 「クライアントを閉じるエラー：$ @ n」。 ELSIF（$ DATA EQ "DIE"）{$ server-> stop（）|| 「サーバーの停止中のエラー：$ @ n」; ##このサブは、新しいクライアントが接続されているとき＃sub connected {my $ client = shift; My $ SERIAL = $ CLIENT-> SERIAL（）; 「Client $ Serial CondenceN」を印刷します。 ##既存のクライアントが切断されたとき＃subが切断されたときに呼び出される{My $ Client = Shift; My $ SERIAL = $ CLIENT-> SERIAL（）; 「Client $ Serial Just Cistonnectn」を印刷します。クライアントの例：Net :: EasyTCPを使用します。 ##新しいクライアントを作成し、サーバー＃$ CLIENT = NEW NET :: EASETCP（MODE => "クライアント"、host => 'localhost'、port => 2345、）|| "クライアントの作成エラー：$ @ n"; ##シンプルな文字列＃$ client-> send（ "こんにちは"）|| 「送信エラー送信：$ @ n」; $ reply = $ client-> receive（）|| 「受信エラー：$ @ n」。 ##参照番号％HASH =（「または "=>"ではない "" => "Perl Hacker"という参照＃％hash =（ ""ではない "" "" "という" "、" $ CLIENT-> SEND（％HASH）|| 「送信エラー送信：$ @ n」; $ reply = $ client-> receive（）|| 「受信エラー：$ @ n」。 foreach（キー％{$ reply}）{印刷キー：$ _ = $応答 - > {$ _} n "; ##大きなバイナリデータ＃（1..8192）{for（0..255）{$ LARGEDATA。= chr（$ _）} $ client-> send（$ LargeData）|| 「送信エラー送信：$ @ n」; $ reply = $ client-> receive（）|| 「受信エラー：$ @ n」。 ##サーバー＃$ client-> close（）からきれいに切断します。要件：・Perl


ネット:: EasyTCP. 関連ソフトウェア

私たちに関しては