在IRC里使用weixin和qq

By Lucas at: 2018-05-16

本文章是介绍怎么在linux的IRC客户端weechat里，进行qq和微信聊天

安装perl的Mojo-ActivePerl

  1. 下载ZIP压缩包(约43M)

    1
    2
    3
    4
    5
    $ wget https://github.com/sjdy521/Mojo-ActivePerl/archive/master.zip -O Mojo-ActivePerl.zip

    #如果下载速度较慢可以使用国内的腾讯云存储地址（文件可能会较旧）

    $ wget http://share-10066126.cos.myqcloud.com/Mojo-ActivePerl-20170214.zip -O Mojo-ActivePerl.zip

  2. 解压到当前目录并进入目录

    1
    2
    $ unzip Mojo-ActivePerl.zip
    $ cd Mojo-ActivePerl-master

  3. 运行安装脚本，指定安装目录(需要有权限创建和写入)

    1
    $ sh install.sh --prefix /usr/local/Mojo-ActivePerl  #这里以/usr/local/Mojo-ActivePerl目录为例

  4. 把如下perl和cpanm所在目录(/usr/local/Mojo-ActivePerl/bin/)添加到PATH环境变量（或不设置环境变量，直接使用绝对路径）

    1
    2
    $ /usr/local/Mojo-ActivePerl/bin/perl
    $ /usr/local/Mojo-ActivePerl/bin/cpanm

安装weechat

1
sudo apt install weechat

编写脚本

Mojo::Weixin;
1
2
3
4
5
#!/usr/bin/env perl
my $client = Mojo::Weixin->new();
$client->load("ShowMsg");
$client->load("IRCShell"); #加载IRCShell插件
$client->run();

启动服务

perl 脚本

用weecgat，链接到服务

1
2
weechat
/server add webqq xxxxxxx

开始聊天

/join

/query

/nick