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

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

htdocs/javascript/require.js  view on Meta::CPAN

     * @returns {Error}
     */
    function makeError(id, msg, err, requireModules) {
        var e = new Error(msg + '\nhttp://requirejs.org/docs/errors.html#' + id);
        e.requireType = id;
        e.requireModules = requireModules;
        if (err) {
            e.originalError = err;
        }
        return e;
    }

htdocs/javascript/require.js  view on Meta::CPAN

    if (typeof requirejs !== 'undefined') {
        if (isFunction(requirejs)) {
            //Do not overwrite an existing requirejs instance.
            return;
        }
        cfg = requirejs;
        requirejs = undefined;
    }

    //Allow for a require config object
    if (typeof require !== 'undefined' && !isFunction(require)) {
        //assume it is a config object.
        cfg = require;
        require = undefined;
    }

    function newContext(contextName) {
        var inCheckLoaded, Module, context, handlers,

htdocs/javascript/require.js  view on Meta::CPAN

     *
     * Make a local req variable to help Caja compliance (it assumes things
     * on a require that are not standardized), and to give a short
     * name for minification/local scope use.
     */
    req = requirejs = function (deps, callback, errback, optional) {

        //Find the right context, use default
        var context, config,
            contextName = defContextName;

 view release on metacpan or  search on metacpan

lib/NCustom.pm  view on Meta::CPAN

#
#
can_ok("NCustom", qw(apt_fix)) 
  || diag("TEST:<apt_fix> is a public function of NCustom");
#
$rc = required_packages(<<'  EOF');
  EXACTLY;   9.9.9;   perl-NCustomDummy;   apt_fix()
  EOF
ok(! $rc)
  || diag("TEST:<required_packages> must return 0 if requirements arent met");
$version = `rpm -q perl-NCustomDummy --qf  \%{VERSION}`;
like($version, qr/1.23/)
  || diag("TEST:<apt_fix> must will install its version rather than nothing");
#
$rc = required_packages(<<'  EOF');
  NOTWANT;   9.9.9;   perl-NCustomDummy;   apt_fix()
  EOF
is($rc, 1)
  || diag("TEST:<required_packages> must return 1 if requirements are met");
$version = `rpm -q perl-NCustomDummy --qf  \%{VERSION}`;

 view release on metacpan or  search on metacpan

utils/NanoB2BNER.pl  view on Meta::CPAN

=head1 OPTIONS

Optional command line arguements

=head2 Options (* = required):

=head3 --help

Displays a brief summary of program options.

 view release on metacpan or  search on metacpan

build/lib/src/render_results.c  view on Meta::CPAN

        char *newbuf = realloc(*buf, required);
        if (newbuf == NULL)
        {
            return -1;
        }
        *bufcap = required;
        *buf = newbuf;
    } while (true);

    if (type == NEO4J_NULL || type == NEO4J_BOOL || type == NEO4J_INT ||
            type == NEO4J_FLOAT)

 view release on metacpan or  search on metacpan

t/test.psgi  view on Meta::CPAN

use Config::Micro;
use File::Spec;

use lib ("$FindBin::Bin/lib", "$FindBin::Bin/extlib/lib/perl5");
use Nephia::TestApp;
my $config = require( Config::Micro->file(
    dir => File::Spec->catdir('nephia-test_app','etc','conf')
));

Nephia::TestApp->run( %$config );

 view release on metacpan or  search on metacpan

t/nephia-test_app/app.psgi  view on Meta::CPAN

use Config::Micro;
use lib (
    File::Spec->catdir(dirname(__FILE__), 'lib'), 
);
use Nephia::TestApp;
my $config = require( Config::Micro->file( dir => File::Spec->catdir('etc','conf') ) );
Nephia::TestApp->run( %$config );

 view release on metacpan or  search on metacpan

lib/Nephia/Setup/Plugin/Relax.pm  view on Meta::CPAN

use Cache::Memcached::Fast;

my $run_env       = $ENV{PLACK_ENV} eq 'development' ? 'local' : $ENV{PLACK_ENV};
my $basedir       = dirname(__FILE__);
my $config_file   = File::Spec->catfile($basedir, 'config', $run_env.'.pl');
my $config        = require($config_file);
my $cache         = Cache::Memcached::Fast->new($config->{'Cache'});
my $session_store = Plack::Session::Store::Cache->new(cache => $cache);
my $app           = {{ $self->appname }}->run(%$config);

builder {

lib/Nephia/Setup/Plugin/Relax.pm  view on Meta::CPAN

};

@@ config.pl 
use File::Basename 'dirname';
use File::Spec;
my $common = require(File::Spec->catfile(dirname(__FILE__), 'common.pl'));
my $conf = {
    %$common,
    'Cache' => { 
        servers   => ['127.0.0.1:11211'],
        namespace => '{{ $self->appname }}',

 view release on metacpan or  search on metacpan

dist.ini  view on Meta::CPAN

[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

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

dist.ini  view on Meta::CPAN

[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

t/client.t  view on Meta::CPAN

    $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

dist.ini  view on Meta::CPAN

remove = Type::Library
remove = Type::Utils

[Prereqs]
-phase = develop
-relationship = requires
Test::Vars = 0.015

[EnsurePrereqsInstalled]
:version = 0.003
type = requires
type = recommends

[GitHub::Meta]
repo = git://github.com/robrwo/Net-Statsd-Lite.git

 view release on metacpan or  search on metacpan

dist.ini  view on Meta::CPAN

[RecommendedPrereqs]
[AutoPrereqs]

[EnsurePrereqsInstalled]
:version = 0.003
type = requires
type = recommends

[GitHub::Meta]
repo = git://github.com/robrwo/Net-Statsd-Tiny.git

 view release on metacpan or  search on metacpan

dist.ini  view on Meta::CPAN

; 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

dist.ini  view on Meta::CPAN

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

dist.ini  view on Meta::CPAN

[Prereqs]
Class::DBI = 0

[Prereqs / TR]
-type  = requires
-phase = test
DBD::SQLite = 0

[Deprecated]