sub scan_bitchx {
my ($server,$msg,$nick,$address,$target) = @_;
- if ($msg =~ /BitchX/ || $msg =~ /bitchx/ || $msg =~ /BX/ ) {
+ if ($msg =~ /BitchX/ || $msg =~ /bitchx/ || $msg =~ /BX/ || $msg =~ /Bersirc/i) {
Irssi::print("Stopped moron BitchX message from ".$nick." [".++$bx_count."]");
Irssi::signal_stop();
}