Неа. Но тем не менее плагин все же что то делает.
Я так понимаю нада вот эту часть подправить
my %sn = ("ЛВЦи§", 1, "©Н§", 2, "©ТБ", 3, "©Хи", 4, "ОйТ", 5, "вЛЎ", 6, "аЁµ", 7, "б»Гµ", 8, "ЎйТЗ", 9, "©Фє", 10, "©ФєаНзґ", 11, "©Фє©Н§", 12, "©Фє©ТБ", 13, "©Фє©Хи", 14, "©ФєОйТ", 15,"©ФєЛЎ", 16,"©ФєаЁµ", 17, "©Фєб»Гµ", 18, "©ФєЎйТЗ", 19);
my %bn = ("ВХи©Фє", 20, "©ТБ©Фє", 30, "©Хи©Фє", 40, "ОиТ©Фє", 50, "вЛЎ©Фє", 60, "аЁµ©Фє", 70, "б»Гµ©Фє", 80, "ЎйТЗ©Фє", 90);
message "[AntiBotkiller] String \"$str\".\n", "success";
my ($str1, $str2, $str3, $str4) = split(/ /, $str);
if($str2 eq "ГйНВ")
ну то есть там где иероглифы?