I was hesitant to use Net::Aim due to the lack of information on the cpan module page. With AOLIM atleast they should examples of how to use it.
In any case, I implemented a fast copy using Net::Aim and I'm getting an error :PARSE: How many args in ' 2'?
The script hangs after "Login Successful". Any suggestions?
print "Subject's name:";
chomp(my $destuser = <STDIN>);
chomp(my $message = <STDIN>);
print "Starting Net::Aim\n";
$aim = new Net::AIM;
print "Connecting with loging crudentials\n";
$conn = $aim->newconn(Screenname => 'wfgs343R',
Password => 'iamcool');
print "Login sucessfull!\n";
print "Beginning AIM\n";
print "Message sent.\n";