+
+ # If users for quakenet are listed, parse them into a hash and schedule a sub to query information
+ if ($config{irc_quakenet_authusers} ne '') {
+ $store{irc_quakenet_users} = { map { $_ => 1 } split / /, $config{irc_quakenet_authusers} };
+
+ schedule sub {
+ my ($timer) = @_;
+ out irc => 0, "PRIVMSG Q :users " . $config{irc_channel};
+ schedule $timer => 300;;
+ } => 1;
+ }
+