Мне нужно установить эту единственную задачу с помощью скрипта Irssi Perl .У меня есть собственный канал, и я хочу отправить сообщение непосредственно на этот канал в определенных сценариях.
Мой опыт работы с Perl довольно ограничен, поэтому у меня его нет.Я запутался, как управлять различными чат-сетями и каналами в сценариях Irssi Perl.Так, как я могу отправить сообщение, например, для канала #testchan@Quakenet
, например?
Тестировать один:
server->command("^MSG $info{'#testchan'} $info{'Test message.'}");
Тестировать два ( tuto о скриптах ):
sub away_describe_pub_channels {
my($net, $channel) = @_;
my ($text) = @_;
my $c = Irssi::server_find_chatnet("QuakeNet")->channel_find("testchan");
$c->command("DESCRIBE $channel $text")
}