NAME

Net::IChat - use apple's iChat as a messaging tool

SYNOPSIS

use Net::IChat;
use Net::IChat::Client;

my $me = Net::IChat->me();
$me->announce;

my $clients = Net::IChat->clients();
if (@$clients) {
  my $conversation = $clients->[0]->converse();
  $conversation->send('Hello');
  my $mesg = $conversation->receive();

  if ($mesg->can('body')) {
    print $mesg->body;
  }
}

DESCRIPTION

Net::IChat allows you to write clients for Apple's Rendezvous iChat.