这是 jabber-querybotp 命令,可以使用我们的多个免费在线工作站之一在 OnWorks 免费托管服务提供商中运行,例如 Ubuntu Online、Fedora Online、Windows 在线模拟器或 MAC OS 在线模拟器
程序:
您的姓名
jabber-querybot - 一个模块化的 perl jabber bot
商品描述
jabber-querybot 连接 jabber 帐户并等待消息。 如果有消息进来,它
将其转发到您的自编程序模块。 模块的返回字符串,jabber-
querybot 将其发送回 jabber 发件人。
它被设计为可重复使用,并且可以轻松编写小型 Jabber 机器人
事情并做好。 一个有很多例子和经验的简单概念是
已实施。
1. 在周围的 jabber-server 上创建一个 jabber 帐户
2. 创建一个机器人应用程序:
光盘示例
cp Querymodule.pm /etc/jabber-querybot/Mybot.pm
cd /etc/jabber-querybot
ln -s Mybot.pm 查询模块.pm
修改登录参数到您的 jabber-bot-account
vim 我的机器人.pm
我们的 $hostname = "swissjabber.ch";
我们的 $user = "";
我们的 $password = "";
我们的 $ident = "Testbot";
我们的 $bot_admin = "\@swissjabber.ch";
我们的 $port = "5222";
我们的 $timeout = "5";
我们的 $service_name = "$user\@$hostname";
我们的 $bot_description = "Bot 帮助标题
机器人描述";
对于每个 jabber 消息,jabber-querybot 将执行 sub run_query,您可以编写
这里是您的应用程序。
您可以控制您的 jabber 响应方式:
· error = 错误信息节
·存在=错误作为存在节
· 忽略 = 忽略消息
配置
jabber-querybot 有很多变量,您可以根据需要轻松修改:
查询状态
$querystatus = [ 0 | 1]
· 0 = Bot 不会处理任何传入的 jabber 消息。
· 1 = Bot 将处理传入的消息。
惩罚状态
如果机器人工作量太大,它会进入惩罚状态并等待一段时间直到他的
状态恢复正常。
$timer_reconnect_default = 21600
每 21600 秒(6 小时),bot 将自动关闭,等待 10 秒然后
再次启动。
$timer_auto_query = 0
如果您在模块中将此变量设置为 60,则机器人将每 60 秒调用一次
function run_auto_query() 您可以将其用于多种用途。
系统 加载
如果您的系统负载 >=6,此机器人将关闭 jabber 连接并检查每个
10 秒系统加载。 如果负载 <=2,机器人将重新开始。
示例
/usr/share/doc/jabber-querybot/examples/Testbot.pm
使用 onworks.net 服务在线使用 jabber-querybotp