NET::OSCAR perl script
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: Code:
#!/usr/bin/perl -w 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. |
Exactly what error do you get?
try use strict; at the top after the use cmd. Also, looks like you are calling a sub im_in() that isn't defined. |
thanks for replying.
removed im_in and added use strict and added my before defining $oscar...still doesn't work, it never gave me any errors, just didnt work altogether. so i decided to start over and came up with this: Code:
#!/usr/bin/perl -w |
Well, that
Code:
while (1) {...} |
All times are GMT -5. The time now is 04:46 AM. |