summaryrefslogtreecommitdiff
path: root/examples/hello.pl
blob: de53c3abd2bc5d159bf94f5b1a48158ff614a3cc (plain)
1
2
3
4
5
6
7
8
9
10
11
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');