The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

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.