view release on metacpan or search on metacpan
lib/Net/MyOpera.pm view on Meta::CPAN
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
lib/Net/MyOpera.pm view on Meta::CPAN
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()>
view release on metacpan or search on metacpan
3. For libz errors like:
/usr/bin/ld: /usr/local/lib/libz.a(crc32.o): relocation R_X86_64_32 against `.rodata' can not be used when
making a shared object; recompile with -fPIC
/usr/local/lib/libz.a: could not read symbols: Bad value
try installing from source code:
download libz source code, https://google-desktop-for-linux-mirror.googlecode.com/files/zlib-1.2.3.tar.gz
according to platform u are using.
open Makefile and add -fPIC in cflag, (smth like: CFLAGS=-O3 -DUSE_MMAP -fPIC)
then compile it:
./configure
make test
view release on metacpan or search on metacpan
lib/Net/OAuth/Simple.pm view on Meta::CPAN
Google's OAuth API requires the non-standard C<scope> parameter to be set
in C<request_token_url>, and you also explicitly need to pass an C<oauth_callback>
to C<get_authorization_url()> method, so that you can direct the user to your site
if you're authenticating users in Web Application mode. Otherwise Google will let
user grant acesss as a desktop app mode and doesn't redirect users back.
Here's an example class that uses Google's Portable Contacts API via OAuth:
package Net::AppUsingGoogleOAuth;
use strict;
lib/Net/OAuth/Simple.pm view on Meta::CPAN
If C<Math::Random::MT> is installed then any nonces generated will use a
Mersenne Twiser instead of Perl's built in randomness function.
=head1 EXAMPLES
There are example Twitter and Twitter xAuth 'desktop' apps and a FireEagle OAuth 1.0a web app
in the examples directory of the distribution.
=head1 BUGS
Non known
view release on metacpan or search on metacpan
lib/Net/OAuth.pm view on Meta::CPAN
=head1 ABSTRACT
OAuth is
"An open protocol to allow secure API authentication in a simple and standard method from desktop and web applications."
In practical terms, OAuth is a mechanism for a Consumer to request protected resources from a Service Provider on behalf of a user.
Please refer to the OAuth spec: L<http://oauth.net/documentation/spec>
view release on metacpan or search on metacpan
Net::OpenMicroBlogging is an implementation of the OpenMicroBlogging protocol.
OpenMicroBlogging is:
An open protocol to allow secure API authentication in a simple and standard
method from desktop and web applications.
http://oauth.net/
INSTALLATION
view release on metacpan or search on metacpan
examples/link-api-example view on Meta::CPAN
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}/.operalinkrc"
: ".operalinkrc" ;
view release on metacpan or search on metacpan
lib/Net/Ping/Network.pm view on Meta::CPAN
The existing ping moduls are slow and can only handle one ping at a time.
Net::Ping::Networks (Net::Ping::Multi) can handle even large ip ranges and entire networks.
Depending of your computing power and memory you can scan a class c network in less then 5 seconds.
On a normal desktop computer and without any further tuning, one should be able to manage 2500-3000 ips in less then 5 minutes.
Threads are utilised to boost performace. Threads feel a still a little bit beta today.
=head2 Methodes
view release on metacpan or search on metacpan
t/cache/public_suffix_list.dat view on Meta::CPAN
fbx-os.fr
fbxos.fr
freebox-os.fr
freeboxos.fr
// freedesktop.org : https://www.freedesktop.org
// Submitted by Daniel Stone <daniel@fooishbar.org>
freedesktop.org
// Futureweb OG : http://www.futureweb.at
// Submitted by Andreas Schnederle-Wagner <schnederle@futureweb.at>
*.futurecms.at
*.ex.futurecms.at
view release on metacpan or search on metacpan
lib/Net/Pushover.pm view on Meta::CPAN
=head1 DESCRIPTION
Pushover is a service that provide an API for a notification sender service to a
big list of devices like android, iphone, ipad, desktop, smart watches, etc...
=head2 ACCESSORS
This is a list of accessors implemented for this module.
view release on metacpan or search on metacpan
docs/draft-calsyn-rvp-01.txt view on Meta::CPAN
haven't been worked out yet. Which ones should receive instant
messages? If one client is "idle" and one client is "busy" what
is the user marked as?
Is there any way for another user to query the status of a
particular client? E.g. to see if the desktop is idle while the
laptop is active & vice-versa? Also, idea of addressing IM's to
a particular online client?
If multiple clients are connected, and the home server refers to
one client, that client is primary. Other clients must send
view release on metacpan or search on metacpan
lib/Net/Rendezvous/Publish/Backend/Avahi.pm view on Meta::CPAN
my $class = shift;
my $self = {@_};
bless $self, $class;
my $bus = Net::DBus->system;
$self->{service} = $bus->get_service('org.freedesktop.Avahi');
$self->{server} =
$self->{service}->get_object('/', 'org.freedesktop.Avahi.Server');
return $self;
}
sub publish {
lib/Net/Rendezvous/Publish/Backend/Avahi.pm view on Meta::CPAN
map { $_ = Net::DBus::dbus_byte(ord($_)) } @{$t};
}
}
my $group = $self->{service}->get_object($self->{server}->EntryGroupNew,
'org.freedesktop.Avahi.EntryGroup');
$group->AddService(
Net::DBus::dbus_int32(-1), Net::DBus::dbus_int32(-1),
Net::DBus::dbus_uint32(0), $args{name},
$args{type}, $args{domain},
$args{host}, Net::DBus::dbus_uint16($args{port}),
view release on metacpan or search on metacpan
lib/Net/SinaWeibo.pm view on Meta::CPAN
app_key => $app_key,
app_key_secret => $app_key_secret);
# authorization
my $callback_url = 'http://youdomain.com/app_callback';
my $url = $client->get_authorize_url(callback_url => $callback_url);
# or don't use callback_url,just like a desktop client.
my $url = $client->get_authorize_url;
# now $client hold the request_token, but you must authorize your app first.
# let user go to visit the authorize url.
say 'Please goto this url:',$url;
view release on metacpan or search on metacpan
lib/Net/Social/Service/Facebook.pm view on Meta::CPAN
parse => 1,
throw_errors => 1,
);
$client->api_key($api_key);
$client->secret($secret);
$client->desktop(1);
return $client;
}
=head1 METHODS
lib/Net/Social/Service/Facebook.pm view on Meta::CPAN
my $user = $self->{_details}->{username};
my $key = $self->{_details}->{api_key};
my $sess_key = $self->{_details}->{session_key};
my $sess_secret = $self->{_details}->{session_secret};
my $client = WWW::Facebook::API->new(
desktop => 1,
parse => 1,
throw_errors => 1,
# debug => 1,
);
#$secret = $sess_secret if defined $sess_secret.
$client->api_key($key);
$client->session_key($sess_key);
$client->secret($sess_secret);
$client->desktop(1);
my %friends;
my $uids = $client->friends->get;
# First get their details
foreach my $friend (@{$client->users->get_info(uids=>$uids,
view release on metacpan or search on metacpan
lib/Net/Todoist.pm view on Meta::CPAN
=head1 DESCRIPTION
This module provide an interface to the API for the
L<Todoist|http://todoist.com/>.
Todoist is a to-do list service that can be accessed from
a web interface or dedicated desktop or mobile clients.
The basic service is free, but you can pay to get additional features.
Read L<http://todoist.com/API/help> for more details.
=head2 METHODS
view release on metacpan or search on metacpan
examples/oauth_desktop.pl view on Meta::CPAN
#!/usr/bin/perl
#
# Net::Twitter::Lite - OAuth desktop app example
#
use warnings;
use strict;
use Net::Twitter::Lite::WithAPIv1_1;
examples/oauth_desktop.pl view on Meta::CPAN
my %consumer_tokens = (
consumer_key => 'v8t3JILkStylbgnxGLOQ',
consumer_secret => '5r31rSMc0NPtBpHcK8MvnCLg2oAyFLx5eGOMkXM',
);
# $datafile = oauth_desktop.dat
my (undef, undef, $datafile) = File::Spec->splitpath($0);
$datafile =~ s/\..*/.dat/;
my $nt = Net::Twitter::Lite::WithAPIv1_1->new(ssl => 1, %consumer_tokens);
my $access_tokens = eval { retrieve($datafile) } || [];
view release on metacpan or search on metacpan
examples/oauth_desktop.pl view on Meta::CPAN
#!/usr/bin/perl
#
# Net::Twitter - OAuth desktop app example
#
use warnings;
use strict;
use Net::Twitter;
examples/oauth_desktop.pl view on Meta::CPAN
my %consumer_tokens = (
consumer_key => 'v8t3JILkStylbgnxGLOQ',
consumer_secret => '5r31rSMc0NPtBpHcK8MvnCLg2oAyFLx5eGOMkXM',
);
# $datafile = oauth_desktop.dat
my (undef, undef, $datafile) = File::Spec->splitpath($0);
$datafile =~ s/\..*/.dat/;
my $nt = Net::Twitter->new(traits => [qw/API::RESTv1_1/], %consumer_tokens);
my $access_tokens = eval { retrieve($datafile) } || [];
view release on metacpan or search on metacpan
lib/Net/VNC.pm view on Meta::CPAN
my $image = $vnc->capture;
$image->save("out.png");
=head1 DESCRIPTION
Virtual Network Computing (VNC) is a desktop sharing system which uses
the RFB (Remote FrameBuffer) protocol to remotely control another
computer. This module acts as a VNC client and communicates to a VNC
server using the RFB protocol, allowing you to capture the screen of
the remote computer.
view release on metacpan or search on metacpan
lib/Net/WURFL/ScientiaMobile.pm view on Meta::CPAN
# process this HTTP request
$scientiamobile->detectDevice($env);
# check if the device is mobile
if ($scientiamobile->getDeviceCapability('ux_full_desktop')) {
print "This is a desktop browser.";
}
=head1 DESCRIPTION
The WURFL Cloud Service by ScientiaMobile, Inc. is a cloud-based
mobile device detection service that can quickly and accurately
detect over 500 capabilities of visiting devices. It can differentiate
between portable mobile devices, desktop devices, SmartTVs and any
other types of devices that have a web browser.
This is the Perl Client for accessing the WURFL Cloud Service, and
it requires a free or paid WURFL Cloud account from ScientiaMobile:
L<http://www.scientiamobile.com/cloud>
lib/Net/WURFL/ScientiaMobile.pm view on Meta::CPAN
=head1 METHODS FOR CAPABILITY DETECTION
=head2 detectDevice
$scientiamobile->detectDevice($env);
$scientiamobile->detectDevice($env, ['ux_full_desktop', 'brand_name']);
Get the requested capabilities from the WURFL Cloud for the given HTTP Request. If the second
argument is not provided, all available capabilities will be fetched.
Refer to the documentation of your web framework to learn how to access C<$env>. For example,
view release on metacpan or search on metacpan
lib/Net/WebSocket/Constants.pm view on Meta::CPAN
REQUIRED_HTTP_STATUS => 101,
REQUIRED_REQUEST_PROTOCOL => 'HTTP/1.1',
};
#These names are taken from:
#https://msdn.microsoft.com/en-us/library/windows/desktop/hh449350(v=vs.85).aspx
# … however, the up-to-date list of canonical codes is at:
#https://www.iana.org/assignments/websocket/websocket.xml
use constant STATUS => {
SUCCESS => 1000,
ENDPOINT_UNAVAILABLE => 1001,
view release on metacpan or search on metacpan
lib/Net/mbedTLS.pm view on Meta::CPAN
(compatible) mbedTLS but requires you to have a shared mbedTLS
available, whereas static linking alleviates that dependency at the
cost of always using the same library version.
mbedTLS, alas, as of this writing does not support
L<pkg-config|https://www.freedesktop.org/wiki/Software/pkg-config/>.
(L<GitHub issue|https://github.com/ARMmbed/mbedtls/issues/228>) If that
changes then dynamic linking may become more reliable.
NB: mbedTLS B<MUST> be built with I<position-independent> code. If you’re
building your own mbedTLS then you’ll need to configure that manually.
view release on metacpan or search on metacpan
chomp($pkgconfig);
if ($pkgconfig !~ /pkg-config/ or
$pkgconfig =~ /not found/i)
{
die "Error: pkgconfig is not available on your system\n".
"It is available from http://pkgconfig.freedesktop.org/\n";
} else {
my $pkgconfig_version = `$pkgconfig --version`;
chomp( $pkgconfig_version );
print "Found pkg-config version $pkgconfig_version.\n";
}
view release on metacpan or search on metacpan
t/test1.xml view on Meta::CPAN
/doc/python-gmenu/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/python-gnome2-desktop/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/python-gnome2/
t/test1.xml view on Meta::CPAN
/doc/rats/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/rdesktop/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/rdoc/
t/test1.xml view on Meta::CPAN
/doc/ubuntu-artwork/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/ubuntu-desktop/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/ubuntu-docs/
t/test1.xml view on Meta::CPAN
/doc/launchpad-integration/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/desktop-file-utils/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/ldap-utils/
t/test1.xml view on Meta::CPAN
/doc/libgmyth0/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/libgnome-desktop-2-7/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/libnet-netmask-perl/
t/test1.xml view on Meta::CPAN
/doc/bind9-host/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/gnome-desktop-data/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/libgnomecanvas2-common/
view release on metacpan or search on metacpan
lib/OAuth/Consumer.pm view on Meta::CPAN
OAuth::Consumer hide away to complexity of this process, including the set-up of
a callback webserver which can be called by the user browser when its
authentication is performed.
This library is oriented toward desktop application, it could possibly be used
in a web application but I have not tried it (and the LWP setup may not be the
most appropiate in this case).
Authenticating your application with OAuth to access some user's ressources is
a matter of requesting and authorising a I<token>. This can be done with the
view release on metacpan or search on metacpan
lib/ODF/lpOD/Tutorial.pod view on Meta::CPAN
=head1 Playing with document metadata
An office document owns a set of so-called I<"metadata">. Metadata is "data
about the document". For the end user, it may be got (and sometimes changed)
through the "File/Properties" sub menu of a typical desktop software. lpOD
allows the programmer to select, read or write any piece of metadata.
=head2 Pre-defined metadata
A document may contain some global metadata. The most commonly used ones are
view release on metacpan or search on metacpan
**********************************************************************
*---------------------------------------------------------------------
* This component creates a folder on the desktop. You must create
* the folder in a hidden component to ensure that deleting your
* product does not delete the folder before the objects within the
* folder are deleted.
*---------------------------------------------------------------------
COMPONENT
* DATE = '950101',
* TIME = '1200',
* SIZE = '1000'
*---------------------------------------------------------------------
* Create your product''s folder on the desktop.
*
* The following changes are required:
* - Change "<Product Name>" in the EXIT keyword to your product name.
*---------------------------------------------------------------------
FILE
view release on metacpan or search on metacpan
WinObject.pm view on Meta::CPAN
=head1 SYNOPSIS
use OS2::WinObject ':all';
$desktop = QueryObject '<WP_DESKTOP>';
OpenObject $desktop, OPEN_SETTINGS, 1
or die "Can't open DESKTOP settings notebook: $!";
$w = SysValue 'CXSCREEN';
($x,$y,$w,$h,$fl,$b,$s) = WindowPos QueryDesktopWindow;
$p = ActiveDesktopPathname;
$p = ObjectPath $desktop;
=head1 DESCRIPTION
Most reasonable things to do with WPS objects require access via the SOM/DSOM
subsystem. However, C<Win*> API contains some (very primitive) means to deal
WinObject.pm view on Meta::CPAN
Note that the functions
LONG WinQuerySysValue(LONG iSysValue, HWND hwndDesktop {SANE DEFAULT})
BOOL WinSetSysValue (LONG iSysValue, LONG lValue, HWND hwndDesktop)
has the desktop argument at the last position, while the C counterparts
have it as the first argument (to enable the default value for the desktop).
The easier-to-use counterparts of these functions are
$value = SysValue($string);
SysValue_set($string, $value) or die "Cannot set: $^E";
view release on metacpan or search on metacpan
meta/makefile.ttl view on Meta::CPAN
# This file provides instructions for packaging.
@prefix : <http://purl.org/NET/cpan-uri/terms#>.
@prefix nfo: <http://www.semanticdesktop.org/ontologies/2007/03/22/nfo#>.
<http://purl.org/NET/cpan-uri/dist/OWL-DirectSemantics/project>
:perl_version_from _:main;
:version_from _:main;
:readme_from _:main;
view release on metacpan or search on metacpan
=head2 OpenOffice::OODoc::Meta
This manual page describes all the available methods to be used in order to
control the global properties (or "metadata") of a document. Most of these
properties are those an end-user can get or set through the "File/Properties"
command with the OpenOffice.org desktop software.
=head2 OpenOffice::OODoc::Manifest
This manual page describes the manifest management API, knowing that the
manifest, in an ODF file, contains the list of the file components
view release on metacpan or search on metacpan
$rsm = $resolver->resolve
("uno:socket,host=localhost,port=8100;urp;StarOffice.ServiceManager");
# get an instance of the Desktop service
$rc = $rsm->getPropertyValue("DefaultContext");
$desktop = $rsm->createInstanceWithContext("com.sun.star.frame.Desktop", $rc);
# create a name/value pair to be used in opening the document
$pv = $uno->createIdlStruct("com.sun.star.beans.PropertyValue");
$pv->Name("Hidden");
$pv->Value(OpenOffice::UNO::Boolean->new(0));
# open a document
$sdoc = $desktop->loadComponentFromURL("file:///home/jrandom/test1.sxw",
"_blank", 0, [$pv]);
# close the document
$sdoc->dispose();
view release on metacpan or search on metacpan
lib/Outthentic/Story.pm view on Meta::CPAN
my $cmd = <<'HERE';
#! /usr/bin/env sh
# Find out the target OS
if [ -s /etc/os-release ]; then
# freedesktop.org and systemd
. /etc/os-release
OS=$NAME
VER=$VERSION_ID
elif lsb_release -h >/dev/null 2>&1; then
# linuxbase.org