教你一招 如何强行退出被限制的QQ群

原文：教你一招 如何强行退出被限制的QQ群

    QQ有群，是个好事。虽然网上爆出了QQ监视电脑文件的传闻，有些网友也检测到不明的通信包，甚至还遇到莫名的截屏，但是QQ的群功能实在可爱，三五成群一聚，也是快事。也许msn也有正式群以后，我也会改用MSN，毕竟安全第一，安全第二，第三还是安全。一想到有个眼睛偷偷地盯着你，心里就起毛。我曾加入一个群，或许有人传了点不好的图，说了几句不好的牢骚话，然后群就死掉了。里面说话没人听见，上群空间察看说群受到限制无法浏览，要退出又说服务器超时。这么一个死群头留在列表里面，烦人，不爽，不环保。

    寒啊...这世上有一辈子不看色图，一辈子说话谨小慎微，一辈子没随地大小便的人吗？佛祖和耶稣说，世人都有罪，金庸老先生虽然给出了一个圣人-洪七公（真正的无产者啊），但是想来现在要找这么一个圣人过来，估计比处女还罕见。秦侩说过，欲加其罪，何患无词，“莫须有”便是有，想办你岳飞就办你，就算没有通金自大，也有经济问题吧，没有经济问题也有打过人吧，不信你连随地大小便都没有过，既然总有辫子能抓到，大家就懒得搞文字游戏了。秦侩真是一个实在人。

    言规正传，大家去找几个PERL模块，Crypt::OICQ，Net::OICQ。当然他们还会用到Digest::MD5， Term:: ANSIColor，Term::ReadKey这些玩意，CPAN或者Google吧，下载以后就perl Makefile.PL，然后make或者nmake。如果实在没有PERL基础就自学，学不会就放弃。

    Crypt::OICQ和Net::OICQ是纯perl的，不编译也行，里面找找有个qq文件，还有个win32qq文件，我喜欢在unix下的命令行操作，直接运行perl qq，这个东东在win32环境下不能接受命令的，只能用win32qq，因为后者还要WIn32::GUI模块支持，我就没理了。qq在win32下执行也可以，要修改一下Net::OICQ::TextConsole.pm文件，把loop()里面的读取从HANDLE循环中取出来，不要放在非堵塞操作循环里面，单独处理，具体怎么做就不多说了，要思考，学习。

    设置环境变量，OICQ_PW=你的口令，然后用“perl qq 你的账号”来运行，QQ的组可以用这样的命令读取出信息来。下面假设群号是12345678，其它号码都是纯属虚构，请勿对号入座。