POEで簡単なIRCのbotを作ってみた。 - (ﾟ∀ﾟ)o彡 sasata299's blog

2009年05月05日00:39 Perl POEで簡単なIRCのbotを作ってみた。 今頃！？って感じもしますが、POEを使ってみました。(*･ω･)ノ POEはイベント駆動アプリケーションフレームワークで、イベントに対するアクションを設定することで、設定したイベントに対してリアルタイムに処理できる、というものみたいです。今回はIRCで、「URLを投げられたらタイトルを返す」というbotを作ってみました。ソースを貼っときます。 irc.pl #!/usr/bin/perl use strict; use warnings; use POE qw(Component::IRC); use HTML::TagParser; my $url = qr{s?https?://[\-_\.~\*'\(\)a-zA-Z0-9;/\?:@&=\+,%#]+}; my $channel = '#hoge