tiarraのプラグイン
自分が愛用してるMirandaIMのIRCプラグインがなぜか\fs20とか\fs18とかのゴミをはくので、それをtiarraでどうにか消し去れないかと思ってプラグイン作ってみた。
クライアント側から\fs二桁の数字が送られるとスペースに変換して消えたように見せる。
ホントはs/\\fs\d\d//g;とかやって何も無いようにしたかったんだけど何でそうしなかったんだか不明。*1
package Client::Miranda; use strict; use warnings; use base qw(Module); sub message_arrived { my ($this,$msg,$sender) = @_; my $rep; if ($sender->isa('IrcIO::Client') && ($msg->command eq 'PRIVMSG' || $msg->command eq 'NOTICE' || $msg->command eq 'KICK' || $msg->command eq 'TOPIC')) { #\fs数字が出たらスペースにして消す $rep = $msg->param(1); $rep =~ s/\\fs\d\d/ /g; $msg->param(1,$rep); } $msg; }
*1:作った時に不具合があってスペースにしたんだけど何でだか忘れた