rakjuk össze a dolgokat... először ment a régi szerveremen futott egy irssi és azon valamit átírkáltam és ment, de sajna a szerver már nincs meg és backupot meg hülye voltam és nem csináltam. a rossz script bezzeg rajt volt a desktop gépen is. most akkor így néz ki:
# .hello-ra word-el valaszol "test" nickre
use strict;
use Irssi;
use Irssi::Irc;
sub cmd_hello {
my ($server, $data, $nick, $mask, $channel) =@_;
if (($data=~/^.hello/) and $nick eq 'DeXTeR') {
$server->command("msg $chan word");
}
}
Irssi::signal_add_last('message public', 'cmd_hello');
Irssi::print("messzidzs bekapcsolva");