WWW::PushBullet - Module giving easy access to PushBullet API
Module giving easy access to PushBullet API
use WWW::PushBullet; my $pb = WWW::PushBullet->new({apikey => $apikey}); $pb->push_address({ device_iden => $device_iden, name => $name, address => $address }); $pb->push_file({ device_iden => $device_iden, file => $filename); $pb->push_link({ device_iden => $device_iden, title => $title, url => $url }); $pb->push_list({ device_iden => $device_iden, title => $title, items => \@items }); $pb->push_note({ device_iden => $device_iden, title => $title, body => $body });
Creates a new instance of PushBullet API
my $pb = WWW::PushBullet->new({apikey => $apikey});
Prints Debug message when '_debug' is enabled
Returns current PushBullet API key
my $apikey = $pb->api_key();
Sets Debug mode
$pb->debug_mode(1);
Returns list of contacts
my $contacts = $pb->contacts(); foreach my $c (@{$contacts}) { printf "Contact '%s' (%s) => %s\n", $c->{name}, $c->{iden}, $c->{email}; }
Returns list of devices
my $devices = $pb->devices(); foreach my $d (@{$devices}) { printf "Device '%s' (%s)=> id %s\n", $d->{nickname}, $d->{model}, $d->{iden}; }
Generic ephemerals function (not supposed to be used directly)
Generic pushes function (not supposed to be used directly)
Upload request to AWS (used by push_file)
Pushes address (with name & address)
$pb->push_address( { device_iden => $device_iden, name => 'GooglePlex', address => '1600 Amphitheatre Pkwy, Mountain View, CA 94043, Etats-Unis' } );
Pushes file
$pb->push_file( { device_iden => $device_iden, file_name => '/var/www/index.html', body => 'File Description' } );
Pushes link (with title & url)
$pb->push_link( { device_iden => $device_iden, title => 'WWW::PushBullet Perl module on GitHub', url => 'https://github.com/sebthebert/WWW-PushBullet' } );
Pushes list (with title & items)
$pb->push_list( { device_iden => $device_iden, title => 'One list with 3 items', items => [ 'One', 'Two', 'Three' ] } );
Pushes note (with title & body)
$pb->push_note( { device_iden => $device_iden, title => 'Note Title', body => 'Note Body' } );
Push SMS
$pb->push_sms( { conversation_iden => $mobile, message => $sms, target_device_iden => $conf->{default_sms_device} } );
Returns PushBullet's user information (name, email, iden...)
my $user_info = $pb->user_info();
Returns WWW::PushBullet module version
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
https://github.com/sebthebert/WWW-PushBullet
Sébastien Thébert <www-pushbullet@onetool.pm>
To install WWW::PushBullet, copy and paste the appropriate command in to your terminal.
cpanm
cpanm WWW::PushBullet
CPAN shell
perl -MCPAN -e shell install WWW::PushBullet
For more information on module installation, please visit the detailed CPAN module installation guide.