view release on metacpan or search on metacpan
[RemovePrereqs::Provided / @Author::KENTNL/RemovePrereqs::Provided]
[Prereqs / @Author::KENTNL/::Role::BundleDeps]
-phase = develop
-relationship = requires
Dist::Zilla::Plugin::Author::KENTNL::RecommendFixes = 0.004002
Dist::Zilla::Plugin::Author::KENTNL::TravisCI = 0.001002
Dist::Zilla::Plugin::Authority = 1.006
Dist::Zilla::Plugin::AutoPrereqs = 0
Dist::Zilla::Plugin::BumpVersionAfterRelease = 0
view release on metacpan or search on metacpan
t/lib/TestAS2.pm view on Meta::CPAN
sub start {
my ($server, $type) = @_;
$Plack::Test::Impl = $type if $type;
my $app = require "$dir/$server/$server.psgi";
my $psgi = Plack::Test->create($app);
return $psgi;
}
view release on metacpan or search on metacpan
ExtUtils::MakeMaker = 7.22
Module::Metadata = 1.000015
[Prereqs / DevelopRequires ]
-phase = develop
-relationship = requires
Software::Security::Policy::Individual = 0.10
Test::CPAN::Changes = 0
Test::Vars = 0.015
; [EnsurePrereqsInstalled]
; :version = 0.003
; type = requires
; type = recommends
[AutomationPolicy]
template = issues_only
view release on metacpan or search on metacpan
lib/Net/FullAuto/ISets/Local/EmailServer_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cmd($sudo.
"cp -v conf.d/10-ssl.conf ".
"/usr/local/etc/dovecot/conf.d",
'__display__');
($stdout,$stderr)=$handle->cmd($sudo.
"sed -i \"s/#ssl = yes/ssl = required/\" ".
"/usr/local/etc/dovecot/conf.d/10-ssl.conf");
($stdout,$stderr)=$handle->cmd($sudo.
"sed -i \"s*ssl/certs/dovecot.pem*".
"letsencrypt/live/mail.$domain_url/fullchain.pem*\" ".
"/usr/local/etc/dovecot/conf.d/10-ssl.conf");
view release on metacpan or search on metacpan
[AutoPrereqs]
[Prereqs]
-phase = test
-relationship = requires
LWP = 0
ExtUtils::MakeMaker = 0
HTTP::Message = 0
Net::Hadoop::WebHDFS = 0.7
Ref::Util = 0
view release on metacpan or search on metacpan
examples/enc.pl view on Meta::CPAN
warn Encode::is_utf8($a);
warn $a = Net::LastFM::Submission::encode_data($a, 'cp1251');
warn Encode::is_utf8($a);
warn $a;
my $conf = require '.lastfmrc';
my $submit = Net::LastFM::Submission->new(map { $_ => $conf->{$_} } 'user', 'password');
warn Dumper $submit->handshake;
view release on metacpan or search on metacpan
managesieve-test-account.sample view on Meta::CPAN
host = localhost
port = 2000
#user = name
#password = pwd
# next setting allows explicit STARTTLS test
#tls = require | yes/auto | no
# use next setting to skip TLS test at all
#tls = skip
#debug = 1
view release on metacpan or search on metacpan
$result;
}
# Check whether the Nessus Server is alive
my $cfg = require ".status";
my($host, $port) = ($cfg->{'nessus_host'}, $cfg->{'nessus_port'});
my $sock = IO::Socket::INET->new('PeerAddr' => $host,
'PeerPort' => $port,
'Proto' => 'tcp');
if (!$sock) {
view release on metacpan or search on metacpan
lib/Net/OAuth2Server/Request.pm view on Meta::CPAN
my $loaded;
sub from_psgi {
my ( $class, $env ) = ( shift, @_ );
my $body;
$body = do { $loaded ||= require Plack::Request; Plack::Request->new( $env )->content }
if ( $env->{'CONTENT_TYPE'} || '' ) =~ $ct_rx
and grep $env->{'REQUEST_METHOD'} eq $_, $class->request_body_methods;
$class->from(
$env->{'REQUEST_METHOD'},
$env->{'QUERY_STRING'},
view release on metacpan or search on metacpan
lib/Net/PublicSuffixList.pm view on Meta::CPAN
=cut
sub fetch_list_from_net ( $self ) {
return if $self->{no_net};
state $rc = require Mojo::UserAgent;
state $ua = Mojo::UserAgent->new;
my $path = catfile( $self->{cache_dir}, $self->default_local_file );
my $local_last_modified = (stat $path)[9];
my $headers = {};
view release on metacpan or search on metacpan
asn1/ber_tlv_length.c view on Meta::CPAN
required_size++;
else
break;
}
if(size <= required_size)
return required_size + 1;
*buf++ = (uint8_t)(0x80 | required_size); /* Length of the encoding */
/*
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
ExtUtils::MakeMaker = 7.22
Module::Metadata = 1.000015
[Prereqs / DevelopRequires ]
-phase = develop
-relationship = requires
Software::Security::Policy::Individual = 0.10
Test::CVE = 0.08
Test::Vars = 0.015
; [EnsurePrereqsInstalled]
; :version = 0.003
; type = requires
; type = recommends
[AutomationPolicy]
template = issues_only
view release on metacpan or search on metacpan
[RecommendedPrereqs]
[AutoPrereqs]
[Prereqs / BuildRequires ]
-phase = build
-relationship = requires
ExtUtils::MakeMaker = 7.22
Module::Metadata = 1.000015
[Prereqs / DevelopRequires ]
-phase = develop
-relationship = requires
Software::Security::Policy::Individual = 0.10
Test::CVE = 0.08
Test::Vars = 0.015
[GitHub::Meta]
view release on metacpan or search on metacpan
; version_rel_day = 12
; version_rel_hour = 20
; version_rel_time_zone = Pacific/Auckland
; auto_prereqs_skip = File::Find
-phase = develop
-relationship = requires
Dist::Zilla::Plugin::Author::KENTNL::CONTRIBUTING = 0.001003
Dist::Zilla::Plugin::Author::KENTNL::RecommendFixes = 0.004002
Dist::Zilla::Plugin::Author::KENTNL::TravisCI = 0.001002
Dist::Zilla::Plugin::Authority = 1.006
Dist::Zilla::Plugin::AutoPrereqs = 0
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
FFI::CheckLib = 0.28
FFI::Platypus::Type::PtrObject = 0.02
[DynamicPrereqs / Alien]
-condition = do { require './lib/NewFangle/Lib.pm'; !NewFangle::Lib->lib }
-body = requires('Alien::libnewrelic', '0.06')
[PruneFiles]
filename = newrelic_sdk.log
[Author::Plicease::Thanks]
view release on metacpan or search on metacpan
src/http/modules/perl/ngx_http_perl_module.c view on Meta::CPAN
if (requires == NGX_CONF_UNSET_PTR) {
return NGX_OK;
}
script = requires->elts;
for (i = 0; i < requires->nelts; i++) {
require_pv((char *) script[i].data);
if (SvTRUE(ERRSV)) {
view release on metacpan or search on metacpan
eg/redis.js view on Meta::CPAN
var http = require ('http'),
redis = require ('redis');
var redisClient = redis.createClient ();
var srv = http.createServer (function (req, res) {
view release on metacpan or search on metacpan
[Prereqs]
Class::DBI = 0
[Prereqs / TR]
-type = requires
-phase = test
DBD::SQLite = 0
[Deprecated]
view release on metacpan or search on metacpan
t/lib/OI18nTest/CDBI.pm view on Meta::CPAN
package OI18nTest::CDBI;
use strict;
use warnings;
use base qw(Class::DBI::mysql);
my $cfg = require("dbi_connect.pl");
my $db = $ENV{DBI_DBNAME} || $cfg->{db};
my $table = $ENV{DBI_TABLE} || $cfg->{table};
my $user = $ENV{DBI_USER} || $cfg->{user};
my $password = $ENV{DBI_PASS} || $cfg->{password};
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
t/Common.pm view on Meta::CPAN
sub method_fail_msg { return "because $_[0] can't $_[1]" }
sub TC { return 1 + TN() }
sub test_constructor {
my ($class, @args) = @_;
my $pass = require_ok( $class );
my $o;
SKIP: {
skip load_fail_msg($class), TC() - 1 unless $pass;
$o = test_new($class,@args);
}
view release on metacpan or search on metacpan
hax/make_argcheck_ops.c.inc view on Meta::CPAN
#endif
#define make_argcheck_ops(required, optional, slurpy, subname) S_make_argcheck_ops(aTHX_ required, optional, slurpy, subname)
static OP *S_make_argcheck_ops(pTHX_ int required, int optional, char slurpy, SV *subname)
{
int params = required + optional;
#ifdef HAVE_OP_ARGCHECK
UNOP_AUX_item *aux = make_argcheck_aux(params, optional, slurpy);
return op_prepend_elem(OP_LINESEQ, newSTATEOP(0, NULL, NULL),
hax/make_argcheck_ops.c.inc view on Meta::CPAN
OP *ret = NULL;
if(required > 0) {
SV *message = newSVpvf("Too few arguments for subroutine '%" SVf "'", subname);
/* @_ >= required or die ... */
OP *checkop =
newSTATEOP(0, NULL,
newLOGOP(OP_OR, 0,
newBINOP(OP_GE, 0,
/* scalar @_ */
view release on metacpan or search on metacpan
[Prereqs / DevelopRequires]
Perl::Critic = 1.156
[EnsurePrereqsInstalled]
:version = 0.003
type = requires
type = recommends
[GitHub::Meta]
repo = git://github.com/robrwo/Object-Signature-Portable.git
view release on metacpan or search on metacpan
t/jira/jira.json view on Meta::CPAN
}
},
"/rest/api/3/issue/{issueIdOrKey}/attachments": {
"post": {
"deprecated": false,
"description": "Adds one or more attachments to an issue. Attachments are posted as multipart/form-data ([RFC 1867](https://www.ietf.org/rfc/rfc1867.txt)).\n\nNote that:\n\n * The request must have a `X-Atlassian-Token: no-check` header, if ...
"operationId": "addAttachment",
"parameters": [
{
"description": "The ID or key of the issue that attachments are added to.",
"in": "path",
view release on metacpan or search on metacpan
template/show_label view on Meta::CPAN
[%- req = '' -%]
[% IF is_required -%]
[%- IF NOT required_display -%]
[%- required_display = OI.theme_properties.required -%]
[%- END -%]
[%- req = required_display -%]
[% END %]
[% pre_label %]<b>[% label %]</b>[% req %][% post_label %]
view release on metacpan or search on metacpan
lib/PAGI/Tutorial.pod view on Meta::CPAN
=head3 Stacking
Because each layer is itself an application, composing them is just nesting:
my $app = require_api_key( with_request_id( with_logging( $bare_app ) ) );
The outermost wrapper runs first on the way in and last on the way out. Order
matters: put logging outside auth if you want to log rejected requests, inside
if you do not.