解析:: IRC

IRCプロトコルのパーサー
今すぐダウンロード

解析:: IRC ランキングとまとめ

広告

  • Rating:
  • ライセンス:
  • Perl Artistic License
  • 価格:
  • FREE
  • 出版社名:
  • Chris Williams
  • 出版社のWebサイト:
  • http://search.cpan.org/bingos/

解析:: IRC タグ


解析:: IRC 説明

IRCプロトコルのためのパーサー Parse :: IRCは、IRCプロトコルに準拠したテキストの行を解析する便利な方法を提供するPerlモジュールです(RFC1459またはRFC2812を参照)。 parse :: ircを使用してください。 #機能インターフェースMy $ HASHREF = PARSE_IRC($ IRC_STRING); #OOインターフェースMy $ irc_parser = parse :: irc-> new(); My $ HASHREF = $ IRC_PARSER-> PARSE($ IRC_STRING); PARSE :: IRCを単純なIRCボットで使用します。#Parse :: IRCを使用した単純なIRCボット。 IO :: Socketを使用してください。 parse :: ircを使用してください。 My $ PARSER = PARSE :: IRC-> NEW(public => 1)。 My%Dispatch =( 'ping' => irc_ping、 '001' => irc_001、 'public' => irc_public); #接続するサーバーと私たちの詳細。 My $ SERVER = "irc.perl.moo";私の$ nick = "parseirc $$"; My $ login = "Simple_bot"; #ボットが参加するチャンネル。私の$ channel = "#irc.pm"; #IRCサーバーに接続します。 My $ SOCK = NEW IO :: Socket :: Inet(PeerAddr => $ Server、Peerport => 6667、Proto => 'TCP')またはDie "Connect N"; #サーバーにログオンします。印刷$ SOCK「Nick $ Nick R N」;印刷$ SOCK "ユーザー$ログイン8 *:Perl IRC Hacks Robot R N"; #サーバーから読み取り線を保管してください。間(My $ input =){$ input = s / r n // g; My $ HASHREF = $ PARSER-> PARSE($ INPUT);スイッチ:{My $ TYPE = LC $ HASHREF - > {command};私の@args。 @args、$ HASHREF - > {prefix}の場合、$ HASHREF - > {prefix}}。 @args、@ {$ HASHREF - > {params}}}を押す。 (定義$ DISPATCH {$ TYPE}){$ Dispatch {$ TYPE} - >(@ args);最後のスイッチstdout結合を印刷する( ''、 "IRC_ $ TYPE:"、@args)、 " n"; SUB IRC_PING {MY $ SERVER = SHIFT;印刷$ SOCK "PONG:$ SERVER\R n";返品1; SUB IRC_001 {印刷STDOUT "$ _ n"に接続されています。印刷$ SOCK「$ CHANNER\R N」;返品1; {My($ WHO、$ WHER、$ WHOR、$ WHANT)= @_;印刷 "$ Who - > $ WHERE - > $ what n";返品1; } 要件: ・Perl


解析:: IRC 関連ソフトウェア