znc で ignore する perl モジュール書いたznc で ignore する perl モジュール書いた "znc ignore" などでググれば cpp のモジュールはヒットするのだけど、自分のしたいことができないやつだったのと、 perl ならなんとかってことで書いた。 package IgnoreSpam; use strict; use warnings; use base 'ZNC::Module'; sub description { "ignore spam" } sub OnChanMsg { my $self = shift; my ($nick, $channel, $message) = @_; if ($self->_is_spam($nick, $channel, $message)) { return $ZNC::HALT; } return $ZNC::CONTINUE; } sub OnChanNoti
