The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Bot::Backbone::Bot::Role::GroupChat - Provides some group related help tools

VERSION

version 0.161950

SYNOPSIS

  service group_foo => (
      service => 'GroupChat',
      chat    => 'jabber_chat',
      group   => 'foo',
  );

  service group_bar => (
      service => 'GroupChat',
      chat    => 'jabber_chat',
      group   => 'bar',
  );

  ...

  for my $name ($bot->list_group_names) { say " * $name" }

  my $chat = $bot->find_group('foo');
  $chat->send_message({ text => 'just to group foo' });

DESCRIPTION

This role is automatically applied to any bot that has one or more Bot::Backbone::Service::GroupChat services.

METHODS

list_group_names

Returns the names of all the groups that this bot has joined or intends on joining.

find_group

  my $chat = $bot->find_group('foo');

Returns the Bot::Backbone::Service::GroupChat that entered the named group.

AUTHOR

Andrew Sterling Hanenkamp <hanenkamp@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2016 by Qubling Software LLC.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.