Perl + Skype4com

Do you have a question? Post it now! No Registration Necessary.  Now with pictures!

Please tell me anybody about Skype4com. I try sample code and can make
a call to friends from script. But I can`t capture events from skype
with Skype4com and Win32::OLE. Code, with I try to capture events is:

use Win32::OLE qw(EVENTS);
$sk=Win32::OLE->new("Skype4COM.Skype") || die "Coudn`t connect $!";
print "Current user: " . $user-> . " is " . "$sts\n";
sub Eve
    print "Event triggered\n";
    exit 0;
exit 0;

I not found it problem at skype forum and i read about Win32::Skype
and Win32::OLE.

Site Timeline