view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.87.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Transpierce.pm view on Meta::CPAN
transpierce --describe dirty_production_task
# set up the environment for that task
transpierce dirty_production_task
# recommended: verify the contents of .sh files
cat dirty_production_task/*.sh
# recommended: set up a git repository (if it is available)
cd dirty_production_task
git init
view all matches for this distribution
view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.68.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
bin/usb-key-copy-con view on Meta::CPAN
console will display a greyed-out icon). By default the filter parameters will
be set to exactly match the vendor name and drive capacity of the master key.
The default profile will format the blanks keys with a VFAT filesystem and the
volume label from the master key. A file-by-file copy will be used to populate
the key and then MD5 checksums will be used to verify the copied files.
It is possible to create your own profiles that do anything you want with the
blank keys. See L<App::USBKeyCopyCon> for more details.
=head2 Desktop Media Automount
view all matches for this distribution
view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.83.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Validation/Automation.pm view on Meta::CPAN
#FQDN of remote server
[AA.xyz.com]
#Processes to verify on remote hosts along with their minimum quantity
PROCESSES = BBL:1, EPsrv:1, WEBLEPsrv:1
#Filesystems to verify on remote hosts
FILE_SYS = /test, /export/home
#FQDN of remote server
[KA.xyz.com]
#Processes to verify on remote hosts along with their minimum quantity
PROCESSES = BBL:1, EPsrv:1, WEBLEPsrv:1
#Filesystems to verify on remote hosts
FILE_SYS = /test, /export/home
#Links specific to KA server these links are checked for accessibility
view all matches for this distribution
view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.87.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/War.pm view on Meta::CPAN
sub tsort_not_unique {
my $self = shift;
# search for unordered items by calculating the topological sort and
# verifying that adjacent items are connected by a directed edge
my @ts = $self->graph->topological_sort;
for my $i (0 .. $#ts - 1) {
my ($u,$v) = @ts[$i,$i+1];
view all matches for this distribution
view release on metacpan or search on metacpan
use App::Wax;
use Test::More tests => 1;
{
# this doesn't do much more than test that water is wet (we need an
# integration test to verify that it does what it's meant to do), but, due
# to a typo, it didn't even pass this test until recently, so it's better
# than nothing
my $wax = App::Wax->new;
my $user_agent = 'Testbot 1.0';
view all matches for this distribution
view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.79.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.88.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.88.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.79.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
AI_AND_LLM_POLICY.txt view on Meta::CPAN
micromanage a contributor's workflow. This includes AI/LLM tools.
AI/LLM code MUST be human vetted
Any code that goes into Test2::Harness should be vetted by a human.
Maintainers who merge pull requests MUST verify the accuracy and utility of
any PR.
If the AI/LLM generated code needs additional edits or corrections
before/during merge, those MUST be a separate commit indicating what human
actions were needed to correct the generated code.
AI/LLM code MUST be in digestible chunks
This applies to any code, but LLMs have a greater capacity for generating
large PRs that are too big for a human to digest and verify.
Overly large PRs must be broken up into smaller commits, and when possible
smaller PRs. If humans cannot reasonably verify a PR it should not be
accepted.
No 'vibe' coding
A human must understand what is being done from start to finish. AI may
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/ZFSCurses/Text.pm view on Meta::CPAN
written%The amount of referenced space written to this dataset since the previous snapshot.
aclinherit%Controls how ACL entries are inherited when files and directories are created. A file system with an aclinherit property of discard does not inherit any ACL entries. A file system with an aclinherit property value of noallow only inherits ...
aclmode%Controls how an ACL is modified during chmod(2). A file system with an aclmode property of discard (the default) deletes all ACL entries that do not represent the mode of the file. An aclmode property of groupmask reduces permissions granted ...
atime%Controls whether the access time for files is updated when they are read. Turning this property off avoids producing write traffic when reading files and can result in significant performance gains, though it might confuse mailers and other sim...
canmount%If this property is set to off, the file system cannot be mounted, and is ignored by "zfs mount -a". Setting this property to off is similar to setting the mountpoint property to none, except that the dataset still has a normal mountpoint pr...
checksum%Controls the checksum used to verify data integrity. The default value is on, which automatically selects an appropriate algorithm (currently, fletcher4, but this may change in future releases). The value off disables integrity checking on u...
compression%Controls the compression algorithm used for this dataset. Setting compression to on indicates that the current default compression algorithm should be used. The default balances compression and decompression speed, with compression ratio ...
copies%Controls the number of copies of data stored for this dataset. These copies are in addition to any redundancy provided by the pool, for example, mirroring or RAID-Z. The copies are stored on different disks, if possible. The space used by mult...
dedup%Configures deduplication for a dataset. The default value is off. The default deduplication checksum is sha256 (this may change in the future). When dedup is enabled, the checksum defined here overrides the checksum property. Setting the value ...
exec%Controls whether processes can be executed from within this file system. The default value is on.
mlslabel%The mlslabel property is currently not supported on FreeBSD.
filesystem_limit%Limits the number of filesystems and volumes that can exist under this point in the dataset tree. The limit is not enforced if the user is allowed to change the limit. Setting a filesystem_limit on a descendent of a filesystem that a...
mountpoint%Controls the mount point used for this file system. See the "Mount Points" section for more information on how this property is used. When the mountpoint property is changed for a file system, the file system and any children that inherit ...
primarycache%Controls what is cached in the primary cache (ARC). If this property is set to all, then both user data and metadata is cached. If this property is set to none, then neither user data nor metadata is cached. If this property is set to me...
view all matches for this distribution
view release on metacpan or search on metacpan
t/04-lock-protocol.t view on Meta::CPAN
my $aep = 'bin/aep';
# Test 1: Lock server mode starts scheduler correctly
{
# Server with no clients will just sit in the event loop.
# We verify it enters server mode by checking stderr output.
# Use timeout to prevent hanging (server would run forever).
my ( $stdout, $stderr, $exit ) = capture {
local $SIG{ALRM} = sub { die "timeout" };
alarm(3);
eval { system( $^X, '-Ilib', $aep, '--lock-server', '--lock-server-order', 'a,b,c' ) };
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/bovespa.pm view on Meta::CPAN
#$stock = uc $stock . ".sa";
$stock = uc $stock;
my $yahoo_query = "select * from yahoo.finance.quotes where symbol in ( \"$stock\" )";
my $ua = LWP::UserAgent->new();
$ua->ssl_opts( verify_hostname => 0 );
$ua->timeout( 10 );
$DB::single = 1;
my %url_params = (
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/cpangitify.pm view on Meta::CPAN
# ABSTRACT: Convert cpan distribution from BackPAN to a git repository
our $VERSION = '0.21'; # VERSION
our $ua = HTTP::Tiny->new( verify_SSL => 1 );
our $opt_metacpan_url;
sub _rm_rf ($file)
{
if($file->is_dir && ! -l $file)
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/cpanm/meta/checker.pm view on Meta::CPAN
$SITELIB/.meta/DISTNAME-DISTVERSION/install.json
These files describe several things, such as dependencies
declared by upstream, and sniffed extra context.
This tool exists to read those files, and verify that their dependencies
are still holding true, that no new conflicting dependencies have
been installed and are silently sitting there broken.
Also, as C<cpanm>'s auxiliary files are really a prototype
for what may eventually become a tool-chain standard, this tool
view all matches for this distribution
view release on metacpan or search on metacpan
t/data/build.fresh.log view on Meta::CPAN
t/local/08_pipe.t ...................... ok
t/local/30_error.t ..................... skipped: Requires Test::Exception, Test::Warn and Test::NoWarnings
t/local/07_sslecho.t ................... ok
t/local/31_rsa_generate_key.t .......... skipped: Test::Exception required
t/local/34_x509_crl.t .................. ok
t/local/36_verify.t .................... ok
t/local/37_asn1_time.t ................. ok
t/local/38_priv-key.t .................. ok
t/local/35_ephemeral.t ................. ok
t/local/32_x509_get_cert_info.t ........ ok
t/local/39_pkcs12.t .................... ok
t/data/build.fresh.log view on Meta::CPAN
PERL_DL_NONLAZY=1 "/Volumes/amaretto/Users/ether/perl5/perlbrew/perls/21.11/bin/perl5.21.11" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
# openssl version=0x100010bf
# Net::SSLeay::VERSION=1.68
t/alpn.t .......................... skipped: ALPN not available in Net::SSLeay
t/01loadmodule.t .................. ok
t/auto_verify_hostname.t .......... ok
t/compatibility.t ................. ok
t/cert_no_file.t .................. ok
t/cert_formats.t .................. ok
t/core.t .......................... ok
t/dhe.t ........................... ok
t/data/build.fresh.log view on Meta::CPAN
t/public_suffix_ssl.t ............. ok
t/mitm.t .......................... ok
t/sessions.t ...................... ok
t/readline.t ...................... ok
t/sni.t ........................... ok
t/sni_verify.t .................... ok
t/signal-readline.t ............... ok
t/startssl-failed.t ............... ok
t/startssl.t ...................... ok
t/sysread_write.t ................. ok
t/verify_fingerprint.t ............ ok
t/verify_hostname.t ............... ok
t/start-stopssl.t ................. ok
t/verify_hostname_standalone.t .... ok
t/acceptSSL-timeout.t ............. ok
t/connectSSL-timeout.t ............ ok
t/nonblock.t ...................... ok
All tests successful.
Files=35, Tests=748, 20 wallclock secs ( 0.16 usr 0.05 sys + 4.28 cusr 0.60 csys = 5.09 CPU)
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
scandeps => 0,
scandeps_tree => [],
format => 'tree',
save_dists => undef,
skip_configure => 0,
verify => 0,
report_perl_version => !$class->maybe_ci,
build_args => {},
features => {},
pure_perl => 0,
cpanfile_path => 'cpanfile',
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
'f|force' => sub { $self->{skip_installed} = 0; $self->{force} = 1 },
'n|notest!' => \$self->{notest},
'test-only' => sub { $self->{notest} = 0; $self->{skip_installed} = 0; $self->{test_only} = 1 },
'S|sudo!' => \$self->{sudo},
'v|verbose' => \$self->{verbose},
'verify!' => \$self->{verify},
'q|quiet!' => \$self->{quiet},
'h|help' => sub { $self->{action} = 'show_help' },
'V|version' => sub { $self->{action} = 'show_version' },
'perl=s' => sub {
$self->diag("--perl is deprecated since it's known to be fragile in figuring out dependencies. Run `$_[1] -S cpanm` instead.\n", 1);
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
my $self = shift;
return if $self->{_checked}++;
$self->bootstrap_local_lib;
}
sub setup_verify {
my $self = shift;
my $has_modules = eval { require Module::Signature; require Digest::SHA; 1 };
$self->{cpansign} = $self->which('cpansign');
unless ($has_modules && $self->{cpansign}) {
warn "WARNING: Module::Signature and Digest::SHA is required for distribution verifications.\n";
$self->{verify} = 0;
}
}
sub parse_module_args {
my($self, $module) = @_;
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
sub _doit {
my $self = shift;
$self->setup_home;
$self->init_tools;
$self->setup_verify if $self->{verify};
if (my $action = $self->{action}) {
$self->$action() and return 1;
}
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
}
sub unpack {
my($self, $file, $uri, $dist) = @_;
if ($self->{verify}) {
$self->verify_archive($file, $uri, $dist) or return;
}
$self->chat("Unpacking $file\n");
my $dir = $file =~ /\.zip/i ? $self->unzip($file) : $self->untar($file);
unless ($dir) {
$self->diag_fail("Failed to unpack $file: no directory");
}
return $dir;
}
sub verify_archive {
my($self, $file, $uri, $dist) = @_;
unless ($dist->{cpanid}) {
$self->chat("Archive '$file' does not seem to be from PAUSE. Skip verification.\n");
return 1;
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
$self->diag_fail("Fetching $chksum_uri failed.\n");
return;
}
$self->diag_ok;
$self->verify_checksum($file, $chk_file);
}
sub verify_checksum {
my($self, $file, $chk_file) = @_;
$self->chat("Verifying the SHA1 for $file\n");
open my $fh, "<$chk_file" or die "$chk_file: $!";
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
}
return $dg->hexdigest;
}
sub verify_signature {
my($self, $dist) = @_;
$self->diag_progress("Verifying the SIGNATURE file");
my $out = `$self->{cpansign} -v --skip 2>&1`;
$self->log($out);
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
}
sub build_stuff {
my($self, $stuff, $dist, $depth) = @_;
if ($self->{verify} && -e 'SIGNATURE') {
$self->verify_signature($dist) or return;
}
require CPAN::Meta;
my($meta_file) = grep -f, qw(META.json META.yml);
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
use strict;
use warnings;
use base 'Exporter';
our @EXPORT = qw//;
our @EXPORT_OK = qw/check_requirements requirements_for verify_dependencies/;
our %EXPORT_TAGS = (all => [ @EXPORT, @EXPORT_OK ] );
use CPAN::Meta::Prereqs 2.132830;
use CPAN::Meta::Requirements 2.121;
use Module::Metadata 1.000023;
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
: scalar _check_conflict($reqs, $_, $dirs)
} $reqs->required_modules
};
}
sub verify_dependencies {
my ($meta, $phases, $type, $dirs) = @_;
my $reqs = requirements_for($meta, $phases, $type);
my $issues = check_requirements($reqs, $type, $dirs);
return grep { defined } values %{ $issues };
}
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
version 0.018
=head1 SYNOPSIS
warn "$_\n" for verify_dependencies($meta, [qw/runtime build test/], 'requires');
=head1 DESCRIPTION
This module verifies if requirements described in a CPAN::Meta object are present.
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
=head2 check_requirements($reqs, $type, $incdirs)
This function checks if all dependencies in C<$reqs> (a L<CPAN::Meta::Requirements|CPAN::Meta::Requirements> object) are met, taking into account that 'conflicts' dependencies have to be checked in reverse. It returns a hash with the modules as key...
=head2 verify_dependencies($meta, $phases, $types, $incdirs)
Check all requirements in C<$meta> for phases C<$phases> and type C<$type>. Modules are searched for in C<@$incdirs>, defaulting to C<@INC>. C<$meta> should be a L<CPAN::Meta::Prereqs> or L<CPAN::Meta> object.
=head2 requirements_for($meta, $phases, $types)
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
#pod URL of a generic proxy server for both HTTP and HTTPS connections (default is C<$ENV{all_proxy}> â if set)
#pod * C<no_proxy> â
#pod List of domain suffixes that should not be proxied. Must be a comma-separated string or an array reference. (default is C<$ENV{no_proxy}> â)
#pod * C<timeout> â
#pod Request timeout in seconds (default is 60)
#pod * C<verify_SSL> â
#pod A boolean that indicates whether to validate the SSL certificate of an C<https> â
#pod connection (default is false)
#pod * C<SSL_options> â
#pod A hashref of C<SSL_*> â options to pass through to L<IO::Socket::SSL>
#pod
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
#pod single destination scheme, host and port. Also, if any connection-relevant
#pod attributes are modified, or if the process ID or thread ID change, the
#pod persistent connection will be dropped. If you want persistent connections
#pod across multiple destinations, use multiple HTTP::Tiny objects.
#pod
#pod See L</SSL SUPPORT> for more on the C<verify_SSL> and C<SSL_options> attributes.
#pod
#pod =cut
my @attributes;
BEGIN {
@attributes = qw(
cookie_jar default_headers http_proxy https_proxy keep_alive
local_address max_redirect max_size proxy no_proxy timeout
SSL_options verify_SSL
);
my %persist_ok = map {; $_ => 1 } qw(
cookie_jar default_headers max_redirect max_size
);
no strict 'refs';
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
my $self = {
max_redirect => 5,
timeout => 60,
keep_alive => 1,
verify_SSL => $args{verify_SSL} || $args{verify_ssl} || 0, # no verification by default
no_proxy => $ENV{no_proxy},
};
bless $self, $class;
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
#pod ($ok, $why) = HTTP::Tiny->can_ssl;
#pod ($ok, $why) = $http->can_ssl;
#pod
#pod Indicates if SSL support is available. When called as a class object, it
#pod checks for the correct version of L<Net::SSLeay> and L<IO::Socket::SSL>.
#pod When called as an object methods, if C<SSL_verify> is true or if C<SSL_verify_mode>
#pod is set in C<SSL_options>, it checks that a CA file is available.
#pod
#pod In scalar context, returns a boolean indicating if SSL is available.
#pod In list context, returns the boolean and a (possibly multi-line) string of
#pod errors indicating why SSL isn't available.
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
$ok = 0;
$reason .= qq/Net::SSLeay 1.49 must be installed for https support\n/;
}
# If an object, check that SSL config lets us get a CA if necessary
if ( ref($self) && ( $self->{verify_SSL} || $self->{SSL_options}{SSL_verify_mode} ) ) {
my $handle = HTTP::Tiny::Handle->new(
SSL_options => $self->{SSL_options},
verify_SSL => $self->{verify_SSL},
);
unless ( eval { $handle->_find_CA_file; 1 } ) {
$ok = 0;
$reason .= "$@";
}
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
my ($self, $request, $scheme, $host, $port) = @_;
my $handle = HTTP::Tiny::Handle->new(
timeout => $self->{timeout},
SSL_options => $self->{SSL_options},
verify_SSL => $self->{verify_SSL},
local_address => $self->{local_address},
keep_alive => $self->{keep_alive}
);
if ($self->{_has_proxy}{$scheme} && ! grep { $host =~ /\Q$_\E$/ } @{$self->{no_proxy}}) {
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
return bless {
rbuf => '',
timeout => 60,
max_line_size => 16384,
max_header_lines => 64,
verify_SSL => 0,
SSL_options => {},
%args
}, $class;
}
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
"/etc/certs/ca-certificates.crt", # Solaris 11.2+
) {
return $ca_bundle if -e $ca_bundle;
}
die qq/Couldn't find a CA bundle with which to verify the SSL certificate.\n/
. qq/Try installing Mozilla::CA from CPAN\n/;
}
# for thread safety, we need to know thread id if threads are loaded
sub _get_tid {
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
# added until IO::Socket::SSL 1.84
if ( Net::SSLeay::OPENSSL_VERSION_NUMBER() >= 0x01000000 ) {
$ssl_args{SSL_hostname} = $host, # Sane SNI support
}
if ($self->{verify_SSL}) {
$ssl_args{SSL_verifycn_scheme} = 'http'; # enable CN validation
$ssl_args{SSL_verifycn_name} = $host; # set validation hostname
$ssl_args{SSL_verify_mode} = 0x01; # enable cert validation
$ssl_args{SSL_ca_file} = $self->_find_CA_file;
}
else {
$ssl_args{SSL_verifycn_scheme} = 'none'; # disable CN validation
$ssl_args{SSL_verify_mode} = 0x00; # disable cert validation
}
# user options override settings from verify_SSL
for my $k ( keys %{$self->{SSL_options}} ) {
$ssl_args{$k} = $self->{SSL_options}{$k} if $k =~ m/^SSL_/;
}
return \%ssl_args;
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
C<timeout> â Request timeout in seconds (default is 60)
=item *
C<verify_SSL> â A boolean that indicates whether to validate the SSL certificate of an C<https> â connection (default is false)
=item *
C<SSL_options> â A hashref of C<SSL_*> â options to pass through to L<IO::Socket::SSL>
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
single destination scheme, host and port. Also, if any connection-relevant
attributes are modified, or if the process ID or thread ID change, the
persistent connection will be dropped. If you want persistent connections
across multiple destinations, use multiple HTTP::Tiny objects.
See L</SSL SUPPORT> for more on the C<verify_SSL> and C<SSL_options> attributes.
=head2 get|head|put|post|delete
$response = $http->get($url);
$response = $http->get($url, \%options);
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
($ok, $why) = HTTP::Tiny->can_ssl;
($ok, $why) = $http->can_ssl;
Indicates if SSL support is available. When called as a class object, it
checks for the correct version of L<Net::SSLeay> and L<IO::Socket::SSL>.
When called as an object methods, if C<SSL_verify> is true or if C<SSL_verify_mode>
is set in C<SSL_options>, it checks that a CA file is available.
In scalar context, returns a boolean indicating if SSL is available.
In list context, returns the boolean and a (possibly multi-line) string of
errors indicating why SSL isn't available.
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
max_redirect
max_size
no_proxy
proxy
timeout
verify_SSL
=head1 SSL SUPPORT
Direct C<https> connections are supported only if L<IO::Socket::SSL> 1.56 or
greater and L<Net::SSLeay> 1.49 or greater are installed. An exception will be
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
Verification of server identity
=back
B<By default, HTTP::Tiny does not verify server identity>.
Server identity verification is controversial and potentially tricky because it
depends on a (usually paid) third-party Certificate Authority (CA) trust model
to validate a certificate as legitimate. This discriminates against servers
with self-signed certificates or certificates signed by free, community-driven
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
By default, HTTP::Tiny does not make any assumptions about your trust model,
threat level or risk tolerance. It just aims to give you an encrypted channel
when you need one.
Setting the C<verify_SSL> attribute to a true value will make HTTP::Tiny verify
that an SSL connection has a valid SSL certificate corresponding to the host
name of the connection and that the SSL certificate has been verified by a CA.
Assuming you trust the CA, this will protect against a L<man-in-the-middle
attack|http://en.wikipedia.org/wiki/Man-in-the-middle_attack>. If you are
concerned about security, you should enable this option.
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
/etc/ssl/ca-bundle.pem
=back
An exception will be raised if C<verify_SSL> is true and no CA certificate file
is available.
If you desire complete control over SSL connections, the C<SSL_options> attribute
lets you provide a hash reference that will be passed through to
C<IO::Socket::SSL::start_SSL()>, overriding any options set by HTTP::Tiny. For
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
*parse = \&new;
sub numify {
my ($self) = @_;
unless (_verify($self)) {
require Carp;
Carp::croak("Invalid version object");
}
my $alpha = $self->{alpha} || "";
my $len = $#{$self->{version}};
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
return $string;
}
sub normal {
my ($self) = @_;
unless (_verify($self)) {
require Carp;
Carp::croak("Invalid version object");
}
my $len = $#{$self->{version}};
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
return $string;
}
sub stringify {
my ($self) = @_;
unless (_verify($self)) {
require Carp;
Carp::croak("Invalid version object");
}
return exists $self->{original}
? $self->{original}
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
}
if ( $swap ) {
($left, $right) = ($right, $left);
}
unless (_verify($left)) {
require Carp;
Carp::croak("Invalid version object");
}
unless (_verify($right)) {
require Carp;
Carp::croak("Invalid version format");
}
my $l = $#{$left->{version}};
my $r = $#{$right->{version}};
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
my ($self) = @_;
return (exists $self->{qv});
}
sub _verify {
my ($self) = @_;
if ( ref($self)
&& eval { exists $self->{version} }
&& ref($self->{version}) eq 'ARRAY'
) {
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
is set in the default options in C<PERL_CPANM_OPT>.
=item --test-only
Run the tests only, and do not install the specified module or
distributions. Handy if you want to verify the new (or even old)
releases pass its unit tests without installing the module.
Note that if you specify this option with a module or distribution
that has dependencies, these dependencies will be installed if you
don't currently have them.
lib/App/cpanminus/fatscript.pm view on Meta::CPAN
I<latest> version of CPAN is installed, C<--skip-satisfied> checks if
a requested version (or not, which means any version) is installed.
Defaults to false.
=item --verify
Verify the integrity of distribution files retrieved from CPAN using CHECKSUMS
file, and SIGNATURES file (if found in the distribution). Defaults to false.
Using this option does not verify the integrity of the CHECKSUMS file, and it's
unsafe to rely on this option if you're using a CPAN mirror that you do not trust.
=item --report-perl-version
Whether it reports the locally installed perl version to the various
view all matches for this distribution
view release on metacpan or search on metacpan
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.73.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
% cpansign -v
It will check each file's integrity, as well as the signature's
view all matches for this distribution
view release on metacpan or search on metacpan
1.502100 2012-01-31
- based on cpanminus 1.5021
1.502101 2012-01-31
- mention cpanm's new "--verify" option in help output
- fix fatpacking
view all matches for this distribution
view release on metacpan or search on metacpan
script/cpanurl view on Meta::CPAN
max_header_lines => 64,
%args
}, $class;
}
my $ssl_verify_args = {
check_cn => "when_only",
wildcards_in_alt => "anywhere",
wildcards_in_cn => "anywhere"
};
script/cpanurl view on Meta::CPAN
if ( $scheme eq 'https') {
IO::Socket::SSL->start_SSL($self->{fh});
ref($self->{fh}) eq 'IO::Socket::SSL'
or die(qq/SSL connection failed for $host\n/);
$self->{fh}->verify_hostname( $host, $ssl_verify_args )
or die(qq/SSL certificate not valid for $host\n/);
}
$self->{host} = $host;
$self->{port} = $port;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/cpm/HTTP.pm view on Meta::CPAN
die "Couldn't find HTTP Clients that support https" if !$backend;
my $http = $backend->new(
agent => "App::cpm/$App::cpm::VERSION",
timeout => 60,
verify_SSL => 1,
%args,
);
my $keep_alive = exists $args{keep_alive} ? $args{keep_alive} : 1;
if ($keep_alive and $backend =~ /LWP$/) {
$http->{ua}->conn_cache({ total_capacity => 3 });
view all matches for this distribution
view release on metacpan or search on metacpan
share/wordlist_en.tsv view on Meta::CPAN
65511 venus
65512 verbalize
65513 verbally
65514 verbose
65515 verdict
65516 verify
65521 verse
65522 version
65523 versus
65524 vertebrae
65525 vertical
view all matches for this distribution
view release on metacpan or search on metacpan
xt/author/docker_dozo.t view on Meta::CPAN
# Run command in existing running container
my $out = `$dozo -I $image -N $container -L -B echo world 2>&1`;
unlike($out, qr/create live container/, 'uses existing container');
like($out, qr/world/, 'command runs via exec in running container');
# Stop container and verify restart
`docker stop $container 2>&1`;
$out = `$dozo -I $image -N $container -L -B echo restarted 2>&1`;
like($out, qr/restarting exited container $container/, 'restarts stopped container');
# Kill and recreate
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/financeta/indicators.pm view on Meta::CPAN
6 => 'KAMA',
7 => 'MAMA',
8 => 'T3',
};
#TODO: verify parameters that are entered by the user
has overlaps => {
bbands => {
name => 'Bollinger Bands',
params => [
# key, pretty name, type, default value
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FlashVideo/Site/Tudou.pm view on Meta::CPAN
die "Couldn't extract video ID, we are out probably out of date" unless $videoID;
debug "Using video ID $videoID";
# Get video info; safe keys seen: YouNeverKnowThat, IAlsoNeverKnow
# but they're not even verifying either safekey or noCatch
# (maybe noCatch means no cache?)
$browser->get(
sprintf "http://v2.tudou.com/v2/kili?safekey=%s&id=%s&noCatch=%d",
'YouNeverKnowThat', $videoID, rand( 10000 ) );
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/gh/Git.pm view on Meta::CPAN
}
sub _temp_cache {
my ($self, $name) = _maybe_self(@_);
_verify_require();
my $temp_fd = \$TEMP_FILEMAP{$name};
if (defined $$temp_fd and $$temp_fd->opened) {
if ($TEMP_FILES{$$temp_fd}{locked}) {
throw Error::Simple("Temp file with moniker '" .
lib/App/gh/Git.pm view on Meta::CPAN
$TEMP_FILES{$$temp_fd}{fname} = $fname;
}
$$temp_fd;
}
sub _verify_require {
eval { require File::Temp; require File::Spec; };
$@ and throw Error::Simple($@);
}
=item temp_reset ( FILEHANDLE )
view all matches for this distribution