diff options
Diffstat (limited to 'examples/hello.pl')
-rw-r--r-- | examples/hello.pl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/examples/hello.pl b/examples/hello.pl new file mode 100644 index 00000000..de53c3ab --- /dev/null +++ b/examples/hello.pl @@ -0,0 +1,12 @@ +# "Hello, world!" script :) /hello <nick> sends "Hello, world!" to <nick> + +use Irssi; + +sub cmd_hello { + my ($data, $server, $channel) = @_; + + $server->command("/msg $data Hello, world!"); + return 1; +} + +Irssi::command_bind('hello', '', 'cmd_hello'); |