NAME

Cocoa::Skype - Perl interface to Skype.framework

SYNOPSIS

use Cocoa::Skype;
use Cocoa::EventLoop;

my $skype = Cocoa::Skype->new(
    name => 'my test application',
    on_attach_response => sub {
        my ($self, $code) = @_;
        if ($code == 1) { # on success
            $self->send('PROTOCOL 8');
        }
    },
    on_notification_received => sub {
        my ($self, $notification) = @_;

        ...
    },
);
$skype->connect;

Cocoa::EventLoop->run;

DESCRIPTION

Cocoa::Skype provides Perl interface to Skype.framework.

METHODS

new

name => 'Skype::Any' : Str

Name of your application. This name will be shown to the user, when your application uses Skype.

on_attach_response => sub { my ($code) = @_; ... }

This callback is called after Skype API client application has called connect. $code is 0 on failure and 1 on success.

on_notification_received => sub { my ($notification) = @_; ... }

This is callback Skype uses to send information to your application. $notification is Skype API string.

on_became_available => sub { ... }

This callback is called after Skype has been launched.

on_became_unavailable => sub { ... }

This callback is called after Skype has quit.

connect

$skype->connect;

Try to connect your application to Skype.

disconnect

$skype->disconnect;

Disconnects your application from Skype.

send

$skype->send($msg);

Use this method to control Skype or request information. $msg is a Skype API string.

isRunning

$skype->isRunning;

Return 1, when Skype is running and 0 otherwise.

isAvailable

$skype->isAvailable;

Return 1, when Skype is available and 0 otherwise.

AUTHOR

Daisuke Murase <typester@cpan.org>

Takumi Akiyama <t.akiym at gmail.com>

SEE ALSO

Public API Reference

Skype::Any

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.