{var%20f='http://v.t.sina.com.cn/share/share.php?appkey=1515056452',u=z||d.location,p=['&url=',e(u),'&title=',e(t||d.title),'&source=',e(r),'&sourceUrl=',e(l),'&content=',c||'gb2312','&pic=',e(p||'')].join('');function%20a(){if(!window.open([f,p].join(''),'mb',['toolbar=0,status=0,resizable=1,width=440,height=430,left=',(s.width-440)/2,',top=',(s.height-430)/2].join('')))u.href=[f,p].join('');};if(/Firefox/.test(navigator.userAgent))setTimeout(a,0);else%20a();})(screen,document,encodeURIComponent,'','','https://www.manongdao.com/data/attach/logo/logo.png', '推荐 老娘就宠你 的问题《Need some info on IRC BOTS using PERL》','https://www.manongdao.com/q-439221.html','页面编码gb2312|utf-8默认gb2312'));){kind=link}
Does any one know of a good irc bot written in perl?
I just need a simple one that logs on to said channel, then replies things based on what the user says.
e.g.
The user:
<tgwizman> !time
The bot replies
<BlahBot> The time is 4:38:54 AM
相关问题
- $ENV{$variable} in perl
- pick a random item from a javascript array
- Is it possible to pass command-line arguments to @
- Redirecting STDOUT and STDERR to a file, except fo
- Change first key of multi-dimensional Hash in perl
相关文章
- Running a perl script on windows without extension
- Comparing speed of non-matching regexp
- Can NOT List directory including space using Perl
- Extracting columns from text file using Perl one-l
- Lazy (ungreedy) matching multiple groups using reg
- How do I tell DBD::mysql where mysql.sock is?
- What is a good way to deploy a Perl application?
- Speeding up Selenium Webdriver
Bot::BasicBot CPAN distribution contains several example bots. Projects Using POE page contains lists of POE-based IRC bots. See also answers here: CHATBOT: Programming a chatbot with Perl
Last time I made an IRC bot I used
AnyEvent::IRC::Client. The example there can be used to start developing your own bot.Also
Net::IRCpage suggests some alternatives.