projects
/
runtime.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
82adfe22f0ed6650f687dccbd299c1d40eac90b3
[runtime.git]
/
apps
/
irssi
/
scripts
/
hello.pl
1
# "Hello, world!" script :) /hello <nick> sends "Hello, world!" to <nick>
2
3
use Irssi;
4
use strict;
5
6
sub cmd_hello {
7
my ($data, $server, $channel) = @_;
8
9
$server->command("/msg $data Hello, world!");
10
}
11
12
Irssi::command_bind('hello', 'cmd_hello');