NAME

POE::Component::YahooMessenger - POE component for Yahoo! Messenger

SYNOPSIS

  use POE qw(Component::YahooMessenger);

  # spawn YM session
  POE::Component::YahooMessenger->spawn(Alias => 'ym');

  # register your session for callbacks
  $kernel->post(ym => 'register');

  # tell YM how to connect
  $kernel->post(ym => connect => {
      id       => 'your_id',
      password => 'xxxxxxx',
  });

  # associate this callback with 'ym_goes_online'
  sub goes_online {
      my $event = $_[ARG0];
      printf "buddy %s goes online\n", $event->buddy_id;
  }

  # send message
  $kernel->post(ym => send_message => {
      to => $buddy_id,
      message => "Hello World",
  });

  # change your status
  $kernel->post(ym => change_my_status => {
      busy => 0, # 0 = not busy
      message => "going for lunch now!",
  });

  # retrieve your buddies list
  $kernel->post(ym => buddies => 'retrieve_buddies');
  sub retrieve_buddies {
      my $buddies = $_[ARG0];
      for my $buddy_id (keys %$buddies) {
	  printf "%s (group: %s)\n", $buddy_id, $buddies->{$buddy_id};
      }
  }

  $poe_kernel->run();

DESCRIPTION

POE::Component::YahooMessenger is a POE component to connect Yahoo! Messener. This module ripoffs a lot of code from Net::YahooMessenger for protocol implementations.

API is intentionally made similar to that of PoCo::IRC.

EVENTS

TBD.

CAVEATS

This is ALPHA SOFTWARE: There maybe some bugs. API might change.

AUTHOR

Tatsuhiko Miyagawa <miyagawa@bulknews.net>

YahooMessenger protocol implementation is based on Net::YahooMessenger by Hiroyuki Oyama <oyama[cpan.org>.

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

SEE ALSO

POE, POE::Component::IRC, Net::YahooMessenger, http://ymca.infoware.ne.jp/