Try this first:

$aim = new Net::AIM;
$aim->debug(1);
$aim->newconn( Screenname => $screenname, Password => $password ) or d
+ie "Can't connect to AIM server.\n";

my $conn = $aim->getconn();
[download]

Then go ahead with:

$conn->set_handler('config', \&on_config);
$conn->set_handler('im_in',    \&on_im);
$conn->set_handler('error',    \&on_error);
$conn->set_handler('eviled',    \&on_evil);

$aim->start;
[download]

I'm pretty sure you must make "newconn" then "getconn".

Also, in my scratchpad, there's a good template for building a AIM interface.

Hope this helps.

John J Reiser
newrisedesigns.com