first off i must say that I have never used anything like net::oscar or net::aim before....what im trying to do is write a small perl script that will login to AIM via net::oscar send an IM to a a couple people, then logout....this script will be invoked by a command on a game server.
Now, I managed to get the game server to run the script, but I cant seem to get Net::OSCAR to login and send the message...heres what i have:
use Net::OSCAR qw(:standard);
$oscar = Net::OSCAR->new();
$oscar->send_im('PERSON#1', 'test message test message');
$oscar->send_im('PERSON#2', 'test message test message');
$oscar->send_im('PERSON#3', 'test message test message');
I know i have to be doing something wrong, but what it is is beyond me. In all honesty the script would work better with my gameserver if it was shell, but that is beyond me as well.
I also have NET::AIM installed and would work just fine for what I need, if someone reading this is more familiar with that.
If anyone can be of any assistance I would appreciate it very much. Thanks in advance.