Result:
found 581 distributions and 1482 files matching your query !
( run in 2.093 )
Net-Launchpad
view release on metacpan or search on metacpan
lib/Net/Launchpad/Role/Person.pm view on Meta::CPAN
with 'Net::Launchpad::Role::Common';
# ABSTRACT: Person roles
method gpg_keys {
return $self->collection('gpg_keys');
}
method irc_nicks {
return $self->collection('irc_nicknames');
}
lib/Net/Launchpad/Role/Person.pm view on Meta::CPAN
version 2.101
=head1 METHODS
=head2 gpg_keys
Returns list a gpg keys registered
=head2 irc_nicks
Returns list of irc nicks
Net-NodeTransformator
view release on metacpan or search on metacpan
SHA1 bdd52baa1a968cc0e1a577a7b073f046d563a317 t/release-kwalitee.t
SHA1 ca37d7b91c2299a98877a6f36d3fab51e8dd906f t/release-pod-coverage.t
SHA1 e7fc4d8f3f29ee522cb53914648393524fc7a6d4 t/release-pod-syntax.t
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1
Comment: GPGTools - http://gpgtools.org
iQIcBAEBAgAGBQJVnlYEAAoJEHwWRyBU62lqtMYP/29a+elaoBZicm8JOIzvOmzU
9UBmBAQr/N4ns6Y3zdIMUyHLr27pCf30O3qwhBGI9wW3YRXfJXOHiNLM7h9wmrVt
oLxNK9RYkoo9OQc4o5vNQ8bnXt9kHc5ZYnA2g8UwHFixuva7kSODMKW1ykhoqLw8
3YXOMr9BvmvIxn4+zg4erLxA+BDvnRCHVnu23TTbZsnWx5hJWw7aH7W1DDNGjrCX
Net-Ping
view release on metacpan or search on metacpan
Features
- return the port num as 5th return value with ack (jfraire)
2.57 Wed Feb 1 19:34:03 CET 2017 (rurban)
Bugfixes
- Resigned with new gpg key
2.56 Wed Jan 18 16:00:00 2017 -0700 (bbb)
Bugfixes
- Stabilize tests
Net-Radius-Server
view release on metacpan or search on metacpan
any concern to you, by all means verify the signature of this file and
contact the author if any discrepancy is detected.
You can find more information about this at the following URL
http://mipagina.cantv.net/lem/gpg/
COPYRIGHT AND LICENSE
Copyright © 2006 Luis E. Muñoz <luismunoz@cpan.org>
Net-Radius
view release on metacpan or search on metacpan
any concern to you, by all means verify the signature of this file and
contact the author if any discrepancy is detected.
You can find more information about this at the following URL
http://mipagina.cantv.net/lem/gpg/
COPYRIGHT AND LICENSE
Original work (c) Christopher Masto. Changes (c) 2002,2003 Luis
E. Muñoz <luismunoz@cpan.org>.
Net-SFTP-Foreign
view release on metacpan or search on metacpan
samples/resume_put.pl view on Meta::CPAN
#
use strict;
use warnings;
@ARGV == 2 or die "Usage:\n resume_put.pl file_len gpg_id\n\n";
my ($len, $id) = @ARGV;
use Net::SFTP::Foreign;
my $base;
samples/resume_put.pl view on Meta::CPAN
while ($len > 0) {
print $fh substr $base, 0, $len;
$len -= length $base
}
close $fh;
unlink 'local.txt.gpg';
system 'gpg', '--encrypt', '--recipient', $id, 'local.txt';
read_file("local.txt.gpg", binmode => ':raw');
}
open STDERR, ">", "Net-SFTP-Foreign.debug";
$Net::SFTP::Foreign::debug = 3+32+128+4096+16384;
samples/resume_put.pl view on Meta::CPAN
my $i = 1;
eval {
while (1) {
my $s;
my $content = create_file(1 + int rand $len);
my $gpg_len = length $content;
for (1..100) {
my $remote = 1 + int rand length $content;
print STDERR "\n\n############################## ${i}:$remote/$gpg_len ################################\n\n";
print " ${i}:$remote/$gpg_len";
$i++;
$s //= Net::SFTP::Foreign->new('localhost');
$s->setcwd($pwd);
write_file("remote.txt.gpg", {binmode => ':raw'}, substr($content, 0, $remote));
$s->put("local.txt.gpg", "remote.txt.gpg", resume => 1);
if ($s->error) {
print $s->error . "!";
undef $s;
next;
}
my $rcontent = read_file("remote.txt.gpg", binary => ':raw');
unless ($content eq $rcontent and
(stat "remote.txt.gpg")[7] == (stat "local.txt.gpg")[7]) {
die "\ndifferent contents\n";
}
}
}
};
Net-SFTP
view release on metacpan or search on metacpan
SHA1 f8022c20ba6a94c9c24b4576c76527bf16a9f94a lib/Net/SFTP/Constants.pm
SHA1 0c32c77688f35877944eb886a1005edf1e425116 lib/Net/SFTP/Util.pm
SHA1 f16f22aefa48564da5c7d5186a35ce7900933f07 t/01-load.t
SHA1 9f73570113ff6c5110b5ac5a63ce73236f420fa4 t/06-circular.t
-----BEGIN PGP SIGNATURE-----
Comment: GPGTools - http://gpgtools.org
iQEcBAEBCAAGBQJZUtOuAAoJEC3vSbXAsR2+54MIAJH88INyz4A52lY7ub/mrlsh
EHtjSXj4tC/dZEQ66mBYmJyceB3MtmSDRar66qwirW12FDrvyA+ZlyWEo7ijThRE
PDAASsMFOUtJRhN9ppQJQetBhvvdXFi0YJAQScScVXql6D6KEdoKpQHk+IMbq2nc
K5Fn8DJOMszIXusB5FOrqzwk6wlDc0+jBlMS/Rj3xsKa9xGBZoHLVAXLlR5hWYBL
Net-UKDomain-Nominet-Automaton
view release on metacpan or search on metacpan
Automaton.pm view on Meta::CPAN
=item SECRING
The full path to the secret keyring file.
eg: /home/user/.gnupg/secring.gpg
=item PUBRING
The full path to the public keyring file.
eg: /home/user/.gnupg/pubring.gpg
=item COMPAT
The compatibility mode for Crypt::OpenPGP (PGP2, PGP5 or GnuPG)
Net-Whois-RIPE
view release on metacpan or search on metacpan
lib/Net/Whois/Object.pm view on Meta::CPAN
my $primary_key = $object->syncupdates_create( { password => $password } );
# or
my $primary_key = $object->syncupdates_create( { pgpkey => $keyID, align => 8 } );
The pgp key must be an eight digit hexadecimal key ID known to the local
C<gpg> executable.
If the C<pgpkey> key is present in the hash reference passed to
syncupdates_create, you can also pass in the C<pgpexec> key to chose a program
to execute for signing (C<gpg> by default), and C<pgpopts>, which must be an
array reference of additional options to pass to the signing binary.
The primary key of the object created is returned.
The attribute used as primary key can be obtained through
C<$object->attribute('primary')>
lib/Net/Whois/Object.pm view on Meta::CPAN
return $response_text;
}
=head2 B<_pgp_sign( $text, $auth )>
Sign the C<$text> with the C<gpg> command and gpg information in C<$auth>
Returns the signed text.
=cut
sub _pgp_sign {
my ( $self, $text, $auth ) = @_;
my $binary = $auth->{pgpexec} || 'gpg';
my $key_id = $auth->{pgpkey};
my @opts = @{ $auth->{pgpopts} || [] };
$key_id =~ s/^0x//;
my $pid = open2( my $child_out, my $child_in, $binary, "--local-user=$key_id", '--clearsign', @opts );
Net-XMPP
view release on metacpan or search on metacpan
lib/Net/XMPP/Roster.pm view on Meta::CPAN
my $status = $Roster->resourceQuery(Net::XMPP::JID,"Work","status");
my @resource = $Roster->resources('bob@jabber.org');
my @resource = $Roster->resources(Net::XMPP::JID);
$Roster->resourceStore('bob@jabber.org',"Home","gpgkey",key);
$Roster->resourceStore(Net::XMPP::JID,"logged on","2004/04/07 ...");
$Roster->store('bob@jabber.org',"avatar",avatar);
$Roster->store(Net::XMPP::JID,"display_name","Bob");
Net-XMPP3
view release on metacpan or search on metacpan
lib/Net/XMPP3/Roster.pm view on Meta::CPAN
my $status = $Roster->resourceQuery(Net::XMPP3::JID,"Work","status");
my @resource = $Roster->resources('bob@jabber.org');
my @resource = $Roster->resources(Net::XMPP3::JID);
$Roster->resourceStore('bob@jabber.org',"Home","gpgkey",key);
$Roster->resourceStore(Net::XMPP3::JID,"logged on","2004/04/07 ...");
$Roster->store('bob@jabber.org',"avatar",avatar);
$Roster->store(Net::XMPP3::JID,"display_name","Bob");
NexposeSimpleXML-Parser
view release on metacpan or search on metacpan
t/test1.xml view on Meta::CPAN
/doc/libgphoto2-2/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/libgpgme11/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/libgpg-error0/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/libgp11-0/
t/test1.xml view on Meta::CPAN
/doc/bridge-utils/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/gpgv/
</key>
</vulnerability>
<vulnerability id="http-generic-browsable-dir" resultCode="VE">
<key>
/doc/graphviz/
OPTIMADE-PropertyDefinitions
view release on metacpan or search on metacpan
externals/OPTIMADE/external/GNU_Units/definitions.units view on Meta::CPAN
# Water is "hard" if it contains various minerals, expecially calcium
# carbonate.
#
clarkdegree grains/brgallon # Content by weigh of calcium carbonate
gpg grains/usgallon # Divide by water's density to convert to
# a dimensionless concentration measure
#
# Shoe measures
#
Opcodes
view release on metacpan or search on metacpan
* added LICENSE head1 to pod, fixes t/z_kwalitee.t
0.12 2013-04-05 rurban
* remove outdated SIGNATURE and META files from repo.
* fix t/kwalitee.t to use generated MYMETA.yml
* Update SIGNATURE with new gpg key
0.11 2011-12-06 rurban
* remove Opcode, Carp and AutoLoader, too heavy and not needed.
Loads 4 files and 1162 lines less.
OpenGL-Array
view release on metacpan or search on metacpan
opengl_array.xs view on Meta::CPAN
for (i=0; i<count; i++)
mat[i] = (GLfloat)SvNV(ST(i+1));
}
#if 0 /* Need to figure out why this is slower than CPU calcs */
/* Use GPU if FBOs and Fragment Programs are supported */
fbo_width = gpgpu_width(len);
if (dim == 4 && fbo_width)
{
GLuint target = GL_TEXTURE_RECTANGLE_ARB;
int w = fbo_width;
int h = len / (w*3);
OurNet-BBS
view release on metacpan or search on metacpan
lib/OurNet/BBS/Authen.pm view on Meta::CPAN
}
sub export_key {
my $self = shift;
return scalar `gpg --armor --export $self->{keyid}`;
}
sub test {
my $self = shift;
return ($self->{gnupg} and $self->{gnupg}->test_default_key_passphrase);
lib/OurNet/BBS/Authen.pm view on Meta::CPAN
# pgp support broken, so...
$cipher_level &= ~CIPHER_PGP;
$auth_level &= ~AUTH_PGP;
}
elsif ($keyid) {
unless ($Pubkey = `gpg --armor --export $keyid`) {
$cipher_level &= ~CIPHER_PGP;
$auth_level &= ~AUTH_PGP;
}
}
elsif (!`gpg --version`) {
$cipher_level &= ~CIPHER_PGP;
$auth_level &= ~AUTH_PGP;
}
else {
$cipher_level &= ~CIPHER_PGP unless $clientflag;
lib/OurNet/BBS/Authen.pm view on Meta::CPAN
my ($self, $pass) = @_;
$self->{gnupg}->passphrase($self->{pass} = $pass);
}
sub gpg_setup {
my ($input, $output, $stderr) = (
IO::Handle->new(),
IO::Handle->new(),
IO::Handle->new(),
);
lib/OurNet/BBS/Authen.pm view on Meta::CPAN
if ($method eq 'decrypt' and not defined $self->{pass}) {
print "error: no passphrase for $self->{who}.\n";
exit;
}
my ($i, $o, $e, $h) = gpg_setup();
my $pid = $self->{gnupg}->$method(
handles => $h,
command_args => (
($method eq 'clearsign') ? (
lib/OurNet/BBS/Authen.pm view on Meta::CPAN
no warnings 'redefine';
sub import_key {
my ($self, $pubkey) = @_;
open my $FH, '| gpg --import --quiet --batch';
print $FH $pubkey;
close $FH;
return $pubkey;
}
lib/OurNet/BBS/Authen.pm view on Meta::CPAN
open my $FH, '>', 'encrypt' or die "$!";
print $FH $message;
close $FH;
return if system("gpg --yes --encrypt --quiet --batch --always-trust --armor -r $self->{who} -o encrypt.gpg encrypt");
local $/;
open $FH, 'encrypt.gpg' or die "$!";
$message = <$FH>;
close $FH;
unlink 'encrypt';
unlink 'encrypt.gpg';
return $message;
}
sub clearsign {
lib/OurNet/BBS/Authen.pm view on Meta::CPAN
open my $FH, '> encrypt' or die "$!";
print $FH $message;
close $FH;
return if system(
"gpg --yes --clearsign -u $self->{keyid} -o encrypt.gpg encrypt"
);
local $/;
open $FH, 'encrypt.gpg' or die "$!";
$message = <$FH>;
close $FH;
unlink 'encrypt';
unlink 'encrypt.gpg';
return $message;
}
.
PAGI
view release on metacpan or search on metacpan
t/certs/server.key view on Meta::CPAN
8wiFY5G/LMp7Oi6zhVNrHvrxoAEhNj5pJto2EOCduuSGkqBVwhsNFyNiY20Qj72A
qeMSWeawGiLng3JlnQ/S7R+Meo6KKQfhJmBEwKdYUFWL6kDp6d8BAWprMQFoavv2
vgjRLdGRboWzcVWYbp1YvT2JY0Duj+amiP0LhadNqEn3reOH7XV+xWSmxvgcD7oW
RwrzZFpdSnVSKEMSJSzwoAV+8FgDRsUbTBlsj9N6ZUn4hCsGDH5L5qTQT3d4bRrw
wsKb01PJAgMBAAECggEAKCGr0B124/ZJgYjBcsomBQFrA+K5a6PoiUEQwK8DkK+a
Bh216lwgTITj1xRGxVdUxAzKCgpg7LFrw03OxvEm12ryQGBtPdNuRsfUKKbUq8g/
Yc1/0IhhlpjXV0mfr4JZk4/iDFzUAFr3UeXpLBP5kAXy58sUIP48f7Apnj7wZPL2
XG4OjP1voq9sWZgZ38jUG/tad4TRtj5NBaeET/f3YAzg3EBLgyxSEX6OPoTnlxrZ
wbE/EijOoR2cN/97StQZ+SRgGDDugcvXIMOmDLPwE6HXuu/BQa4FNdx6paEWd7vQ
dTiQlNzxhoQqYWwZR1CcO6S/ylCpOymVYh4t8G0EAQKBgQD+HxpnGDGVDlomE0nS
54EaIurSRFE4biFmdt7xI3mzRhJ7k8qjvXtCQb5OaxDSLCNV6BCxutpWz1X9/NvO
PAR-Dist
view release on metacpan or search on metacpan
lib/PAR/Dist.pm view on Meta::CPAN
return $files;
}
=head2 sign_par
Digitally sign a PAR distribution using C<gpg> or B<Crypt::OpenPGP>,
via B<Module::Signature>.
=cut
sub sign_par {
lib/PAR/Dist.pm view on Meta::CPAN
_verify_or_sign(%args, action => 'sign');
}
=head2 verify_par
Verify the digital signature of a PAR distribution using C<gpg> or
B<Crypt::OpenPGP>, via B<Module::Signature>.
Returns a boolean value indicating whether verification passed; C<$!>
is set to the return code of C<Module::Signature::verify>.
PAR-Packer
view release on metacpan or search on metacpan
script/tkpp view on Meta::CPAN
perl_path => $EXECUTABLE_NAME,
pp_path => File::Spec->catfile( dirname($PROGRAM_NAME), 'pp' . $pp_extension ),
log_path => 'tkpp.log',
commandline_path => 'tkpp_command.bat',
tkpp_conf => 'tkpp_conf.tkpp',
gpg_path => undef,
perl_version => $PERL_VERSION,
tk => {
name_application => 'Tkpp',
header_title => "Tkpp is a GUI frontend to pp, which can turn perl scripts \n"
. 'into stand-alone PAR files, perl scripts or executables.',
PGP-FindKey
view release on metacpan or search on metacpan
die( "The key could not be found, or there was one than one match.\n" ) unless defined($obj);
print $obj->result; # the keyid found.
print $obj->name; # the name associated with the key.
# We could call `gpg --recv-key $obj->result` here.
=head1 DESCRIPTION
Perl interface to finding PGP keyids from e-mail addresses.
PGP-Finger
view release on metacpan or search on metacpan
lib/PGP/Finger/App.pm view on Meta::CPAN
$q = lc($q);
if( $q eq 'dns' ) {
$src = PGP::Finger::DNS->new();
} elsif( $q eq 'keyserver' ) {
$src = PGP::Finger::Keyserver->new();
} elsif( $q eq 'gpg' ) {
$src = PGP::Finger::GPG->new();
} elsif( $q eq 'file' ) {
$src = PGP::Finger::File->new(
input => $self->input,
format => $self->format,
PGP-Mail
view release on metacpan or search on metacpan
PGP::Mail - Signature checking for PGP-signed mail messages
=head1 SYNOPSIS
use PGP::Mail;
my $pgpmail=new PGP::Mail($mail, {default-keyring=>"kr.gpg"});
$status=$pgpmail->status();
$keyid=$pgpmail->keyid();
$data=$pgpmail->data();
=head1 DESCRIPTION
if(!$self->{PGPTEXT} && !$self->{PGPMIME}) {
return 0;
}
$self->{gpg}=new GnuPG::Interface;
$self->{gpg}->options->hash_init( %$args );
$self->{gpg}->options->meta_interactive( 0 );
if($self->{PGPTEXT}) {
$self->textpgp(\@lines);
}
else {
stdout=>$output,
stderr=>$error,
status=>$status,
passphrase=>$pp
);
my $pid=$self->{gpg}->decrypt(handles=>$handles);
close $pp;
print $input join "",@$data;
close $input;
stdin=>$input,
stdout=>$output,
stderr=>$error,
status=>$status
);
my $pid=$self->{gpg}->verify(handles=>$handles, command_args=>["-",$fn]);
print $input $signature;
close $input;
$parser=new MIME::Parser;
PGP-Sign
view release on metacpan or search on metacpan
lib/PGP/Sign.pm view on Meta::CPAN
=for stopwords
Allbery DSS GNUPGHOME GPG GPG1 Gierth Mitzelfelt OpenPGP PGPMoose PGPPATH
TMPDIR canonicalized d'Itri egd keyrings pgpverify ps signcontrol
KEYID --force-v3-sigs --allow-weak-digest-algos --homedir --textmode cleartext
cryptographic gpg gpg1 gpgv homedir interoperable tmpdir
=head1 NAME
PGP::Sign - Create detached PGP signatures for data, securely
lib/PGP/Sign.pm view on Meta::CPAN
trailing spaces when generating or checking cleartext signatures.
=item path
The path to the GnuPG binary to use. If not set, PGP::Sign defaults to
running B<gpg> (as found on the user's PATH) for a C<style> setting of "GPG"
and B<gpg1> (as found on the user's PATH) for a C<style> setting of "GPG1".
PGP::Sign does not support B<gpgv> (it passes options that it does not
understand). This parameter should point to a full GnuPG implementation.
=item style
The style of OpenPGP backend to use, chosen from "GPG" for GnuPG v2 (the
lib/PGP/Sign.pm view on Meta::CPAN
deprecated protocols and cryptographic algorithms with known weaknesses.
=item $PGP::Sign::PGPS
The path to the program used by pgp_sign(). If not set, PGP::Sign defaults to
running B<gpg> (as found on the user's PATH) if $PGP::Sign::PGPSTYLE is set to
"GPG" and B<gpg1> (as found on the user's PATH) if $PGP::Sign::PGPSTYLE is set
to "GPG1".
=item $PGP::Sign::PGPV
The path to the program used by pgp_verify(). If not set, PGP::Sign defaults
to running B<gpg> (as found on the user's PATH) if $PGP::Sign::PGPSTYLE is set
to "GPG" and B<gpg1> (as found on the user's PATH) if $PGP::Sign::PGPSTYLE is
set to "GPG1".
PGP::Sign does not support B<gpgv> (it passes options that it does not
understand). This variable should point to a full GnuPG implementation.
=item $PGP::Sign::TMPDIR
The directory in which temporary files are created. Defaults to whatever
lib/PGP/Sign.pm view on Meta::CPAN
This program is free software; you may redistribute it and/or modify it
under the same terms as Perl itself.
=head1 SEE ALSO
gpg(1), gpg1(1), L<File::Temp>
L<RFC 4880|https://tools.ietf.org/html/rfc4880>, which is the current
specification for the OpenPGP message format.
The current version of PGP::Sign is available from CPAN, or directly from its
PGXN-Site
view release on metacpan or search on metacpan
lib/PGXN/Site/Locale/en/mirroring.html view on Meta::CPAN
<h1 id="mirroringpgxn">Mirroring PGXN</h1>
<p>Hosting a PGXN mirror is simple. All you need is:</p>
<ul>
<li>A reasonably fast internet connection</li>
POE-Wheel-GnuPG
view release on metacpan or search on metacpan
lib/POE/Wheel/GnuPG.pm view on Meta::CPAN
# This is called when you can feed input data
ready_to_input_data => sub {
my $input_fh = $_[ARG0];
# In our case, we get the encrypted file handle,
# read from it and feed the gpg input with it
my $encrypted_fh = $_[HEAP]{encrypted_fh};
if (eof($encrypted_fh)) {
# if it's the end of the encrypted file, we signify to the gnupg object
# that it's the end of input
$_[HEAP]{gnupg}->finished_writing_input();
( run in 2.093 seconds using v1.01-cache-2.11-cpan-df04353d9ac )