view release on metacpan or  search on metacpan

examples/myopera-status  view on Meta::CPAN

use strict;
use warnings;

use Net::MyOpera ();
use File::Slurp  ();

# Test keys. Get your own at:
#   https://auth.opera.com/service/oauth/applications/

our $CONSUMER_KEY    = 'test_desktop_key';
our $CONSUMER_SECRET = 'p2FlOFGr3XFm5gOwEKKDcg3CvA4pp0BC';

my $rc_file = exists $ENV{HOME}
    ? "$ENV{HOME}/.myoperarc"
    : ".myoperarc" ;

my $new_status = $ARGV[0] or die "Usage: $0 '<new_status>'\n";

# Read tokens from the .rc file
sub restore_tokens {

lib/Net/MyOpera.pm  view on Meta::CPAN

To use this module, B<you will need your set of OAuth API keys>.
To get your own OAuth consumer key and secret, you need to go to:

  https://auth.opera.com/service/oauth/

where you will be able to B<sign up to the My Opera Community>
and B<create your own application> and get your set of consumer keys.

If you don't want to do it, you can use (temporarily) use the
Test application keys, for command line/desktop based applications:

  Consumer key: test_desktop_key
  Consumer secret: p2FlOFGr3XFm5gOwEKKDcg3CvA4pp0BC

=head1 SUBROUTINES/METHODS

=head2 CLASS CONSTRUCTOR

=head3 C<new( %args )>

Class constructor. 

lib/Net/MyOpera.pm  view on Meta::CPAN

    );

To get your own consumer key and secret, you need to head over to:

  https://auth.opera.com/service/oauth/

where you will be able to sign up to the My Opera Community
and create your own application and get your set of consumer keys.

If you don't want to do it, you can use (temporarily) use the
Test application keys, for command line/desktop based applications:

  Consumer key: test_desktop_key
  Consumer secret: p2FlOFGr3XFm5gOwEKKDcg3CvA4pp0BC

=head2 INSTANCE METHODS

=head3 C<access_token()>

=head3 C<access_token($new_value)>

=head3 C<access_token_secret()>