view release on metacpan or search on metacpan
t/data/build.fresh.log view on Meta::CPAN
Entering Metabase-Client-Simple-0.010
Checking configure dependencies from META.json
Checking if you have ExtUtils::MakeMaker 6.17 ... Yes (7.04)
Configuring Metabase-Client-Simple-0.010
Running Makefile.PL
Warning: prerequisite HTTP::Request::Common 0 not found.
Warning: prerequisite HTTP::Status 5.817 not found.
Warning: prerequisite LWP::UserAgent 5.54 not found.
Checking if your kit is complete...
Looks good
Generating a Unix-style Makefile
t/data/build.fresh.log view on Meta::CPAN
Checking if you have JSON 2 ... Yes (2.90)
Checking if you have strict 0 ... Yes (1.09)
Checking if you have Metabase::User::Secret 0 ... Yes (0.024)
Checking if you have Test::More 0.88 ... Yes (1.001014)
Checking if you have HTTP::Status 5.817 ... No
Checking if you have HTTP::Request::Common 0 ... No
Checking if you have ExtUtils::MakeMaker 0 ... Yes (7.04)
Checking if you have warnings 0 ... Yes (1.32)
Checking if you have File::Spec 0 ... Yes (3.56)
Checking if you have URI 0 ... Yes (1.67)
Checking if you have LWP::UserAgent 5.54 ... No
==> Found dependencies: HTTP::Status, HTTP::Request::Common, LWP::UserAgent
Searching HTTP::Status on mirror http://mirrors.gossamer-threads.com/CPAN ...
--> Working on HTTP::Status
Fetching http://mirrors.gossamer-threads.com/CPAN/authors/id/G/GA/GAAS/HTTP-Message-6.06.tar.gz
-> OK
Unpacking HTTP-Message-6.06.tar.gz
t/data/build.fresh.log view on Meta::CPAN
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/lib/perl5/HTTP/Request/Common.pm
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/man/man3/HTTP::Config.0
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/man/man3/HTTP::Headers.0
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/man/man3/HTTP::Headers::Util.0
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/man/man3/HTTP::Message.0
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/man/man3/HTTP::Request.0
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/man/man3/HTTP::Request::Common.0
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/man/man3/HTTP::Response.0
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/man/man3/HTTP::Status.0
Appending installation info to /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/lib/perl5/darwin-2level/perllocal.pod
-> OK
Successfully installed HTTP-Message-6.06
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/lib/perl5/darwin-2level/.meta/HTTP-Message-6.06/MYMETA.json
Installing /Volumes/amaretto/Users/ether/.perlbrew/libs/21.11@std/lib/perl5/darwin-2level/.meta/HTTP-Message-6.06/install.json
Searching HTTP::Request::Common on mirror http://mirrors.gossamer-threads.com/CPAN ...
Already tried HTTP-Message-6.06. Skipping.
Searching LWP::UserAgent on mirror http://mirrors.gossamer-threads.com/CPAN ...
--> Working on LWP::UserAgent
Fetching http://mirrors.gossamer-threads.com/CPAN/authors/id/E/ET/ETHER/libwww-perl-6.13.tar.gz
-> OK
t/data/build.fresh.log view on Meta::CPAN
Checking if you have HTTP::Response 6 ... Yes (6.04)
Checking if you have Test::More 0 ... Yes (1.001014)
Checking if you have HTTP::Status 6 ... Yes (6.03)
Checking if you have URI::Escape 0 ... Yes (3.31)
Checking if you have IO::Socket 0 ... Yes (1.38)
Checking if you have HTTP::Request::Common 6 ... Yes (6.04)
Checking if you have HTML::Entities 0 ... No
Checking if you have Test 0 ... Yes (1.26)
Checking if you have Net::FTP 2.58 ... Yes (3.05)
Checking if you have MIME::Base64 2.1 ... Yes (3.15)
Checking if you have HTTP::Request 6 ... Yes (6.00)
==> Found dependencies: WWW::RobotRules, HTML::HeadParser, HTTP::Negotiate, File::Listing, HTTP::Daemon, HTTP::Cookies, Net::HTTP, HTML::Entities
Searching WWW::RobotRules on mirror http://mirrors.gossamer-threads.com/CPAN ...
--> Working on WWW::RobotRules
Fetching http://mirrors.gossamer-threads.com/CPAN/authors/id/G/GA/GAAS/WWW-RobotRules-6.02.tar.gz
-> OK
t/data/build.fresh.log view on Meta::CPAN
Checking if you have ExtUtils::MakeMaker 0 ... Yes (7.04)
Checking if you have HTTP::Response 6 ... Yes (6.04)
Checking if you have LWP::MediaTypes 6 ... Yes (6.02)
Checking if you have HTTP::Date 6 ... Yes (6.02)
Checking if you have Sys::Hostname 0 ... Yes (1.20)
Checking if you have HTTP::Request 6 ... Yes (6.00)
Checking if you have IO::Socket 0 ... Yes (1.38)
Checking if you have HTTP::Status 6 ... Yes (6.03)
Building and testing HTTP-Daemon-6.01
Manifying 1 pod document
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
t/data/build.fresh.log view on Meta::CPAN
#
# === Runtime Requires ===
#
# Module Want Have
# --------------------- ----- ----
# HTTP::Request::Common any 6.04
# HTTP::Status 5.817 6.03
# JSON 2 2.90
# LWP::UserAgent 5.54 6.13
# URI any 1.67
# strict any 1.09
view all matches for this distribution
view release on metacpan or search on metacpan
inc/bundle/File/Fetch.pm view on Meta::CPAN
### modules required to download with lwp ###
my $use_list = {
LWP => '0.0',
'LWP::UserAgent' => '0.0',
'HTTP::Request' => '0.0',
'HTTP::Status' => '0.0',
URI => '0.0',
};
view all matches for this distribution
view release on metacpan or search on metacpan
lib/CPAN/Audit/DB.pm view on Meta::CPAN
use warnings;
our $VERSION = '20260720.001';
sub db {
{"dists" => {"ActivePerl" => {"advisories" => [{"affected_versions" => ["==5.16.1.1601"],"cves" => ["CVE-2012-5377"],"description" => "Untrusted search path vulnerability in the installation functionality in ActivePerl 5.16.1.1601, when installed in...
}
__PACKAGE__;
view all matches for this distribution
view release on metacpan or search on metacpan
t/data/Haineko-cpanfile view on Meta::CPAN
requires 'Try::Tiny', '0.16';
on test => sub {
requires 'Test::More', '0.98';
requires 'Plack::Test', '';
requires 'HTTP::Request', '6.00';
};
on develop => sub {
requires 'Test::UsedModules', '0.03';
requires 'IO::Socket::INET', '1.31';
view all matches for this distribution
view release on metacpan or search on metacpan
lib/CSS/Inliner.pm view on Meta::CPAN
local $URI::ABS_REMOTE_LEADING_DOTS = 1;
# Create a request
my $uri = URI->new($$params{url});
my $req = HTTP::Request->new('GET', $uri, [ 'Accept' => 'text/html, */*' ]);
# Pass request to the user agent and get a response back
my $res = $ua->request($req);
# if not successful
view all matches for this distribution
view release on metacpan or search on metacpan
examples/EVStest.pl view on Meta::CPAN
#!/usr/bin/perl -w
use strict;
use LWP::UserAgent;
use HTTP::Request::Common;
use CaCORE::ApplicationService;
use CaCORE::EVS;
#
# ApplicationService is a utility classs that encapsulates webservice invocation to caCORE server.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Cache/Ehcache.pm view on Meta::CPAN
return {%args};
}
sub BUILD {
my $self = shift;
my $req = HTTP::Request->new( 'PUT', $self->_make_url() );
my $res = $self->ua->request($req);
}
__PACKAGE__->meta->make_immutable;
no Moose;
use HTTP::Request;
use HTTP::Status qw(:constants);
sub set {
my $self = shift;
my ( $key, $value, $expires_in ) = @_;
my @header =
($expires_in) ? ( 'ehcacheTimeToLiveSeconds' => $expires_in ) : ();
my $req =
HTTP::Request->new( 'PUT', $self->_make_url($key), \@header, $value );
my $res = $self->ua->request($req);
unless ( $res->is_success ) {
warn $res->status_line . "\n";
}
}
lib/Cache/Ehcache.pm view on Meta::CPAN
}
sub delete {
my $self = shift;
my ($key) = @_;
my $req = HTTP::Request->new( 'DELETE', $self->_make_url($key) );
my $res = $self->ua->request($req);
if ( !$res->is_success && $res->code != HTTP_NOT_FOUND ) {
warn $res->status_line . "\n";
}
}
sub clear {
my $self = shift;
my $req = HTTP::Request->new( 'DELETE', $self->_make_url('*') );
my $res = $self->ua->request($req);
unless ( $res->is_success ) {
warn $res->status_line . "\n";
}
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/CanvasCloud/API.pm view on Meta::CPAN
}
sub request {
my ( $self, $method, $uri ) = @_;
my $r = HTTP::Request->new( $method => $uri );
$r->header( 'Authorization' => 'Bearer '.$self->token );
return $r;
}
lib/CanvasCloud/API.pm view on Meta::CPAN
die 'Bad Link: none of listed relation found - '.join(', ', keys %struct) unless ( $TYPE );
}
return \%struct;
}
## Taken from HTTP::Request::Common
sub encode_url {
my ( $self, $content ) = @_;
my $url = URI->new('http:');
lib/CanvasCloud/API.pm view on Meta::CPAN
Base uri for Canvas LMS
=head2 request( $method, $uri )
returns HTTP::Request;
request creates a HTTP::Request->new( $method => $uri ) it then sets the 'Authorization' header
=head2 send( $request )
Attempts to send request to Canvas recursively depending on return Link header.
Finally returns a hashref data structure as response from Canvas.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Captcha/AreYouAHuman.pm view on Meta::CPAN
}
# Make the request
my $ua = LWP::UserAgent->new;
my $req = HTTP::Request->new(POST => 'https://' . $server .
'/ayahwebservices/index.php/ayahwebservice/scoreGame');
$req->content_type('application/x-www-form-urlencoded');
$req->content('session_secret=' . uri_escape($session_secret) . '&client_ip=' .
uri_escape($client_ip));
my $res = $ua->request($req);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Carrot/Personality/Structured/Internet/Protocol/HTTP/Request./unit_tests/proof_of_concept.pl view on Meta::CPAN
package main
# /type library
# /capability "Proof of concept for ::HTTP::Request"
{
use strict;
use warnings 'FATAL' => 'all';
my $expressiveness = Carrot::individuality;
$expressiveness->package_resolver->provide(
my $request_class = '::Personality::Structured::Internet::Protocol::HTTP::Request');
my $request = $request_class->indirect_constructor;
$request->header_lines->header_host->assign_value('localhost');
$request->line->method->assign_value('GET');
view all matches for this distribution
view release on metacpan or search on metacpan
"Plack" : "0.992"
}
},
"test" : {
"requires" : {
"HTTP::Request::Common" : "0",
"Test::More" : "0.88",
"Web::Simple" : "0.016"
}
}
},
view all matches for this distribution
view release on metacpan or search on metacpan
t/lib/Test/Rest.pm view on Meta::CPAN
{
url => { type => SCALAR },
headers => { type => HASHREF, default => {} },
},
);
my $req = HTTP::Request->new( "$method" => $p{'url'} );
$req->header( $_ => $p{headers}{$_} ) for keys %{ $p{headers} };
$req->content_type( $self->{'content_type'} );
return $req;
};
}
t/lib/Test/Rest.pm view on Meta::CPAN
url => { type => SCALAR },
data => 1,
headers => { type => HASHREF, default => {} },
},
);
my $req = HTTP::Request->new( "$method" => $p{'url'} );
$req->header( $_ => $p{headers}{$_} ) for keys %{ $p{headers} };
$req->content_type( $self->{'content_type'} );
$req->content_length(
do { use bytes; length( $p{'data'} ) }
);
view all matches for this distribution
view release on metacpan or search on metacpan
"Catalyst::View" : "0",
"Catalyst::View::TT" : "0",
"File::Find" : "0",
"File::Temp" : "0",
"FindBin" : "0",
"HTTP::Request::AsCGI" : "0",
"Test::More" : "0.96",
"Text::Diff" : "0",
"base" : "0",
"lib" : "0"
}
view all matches for this distribution
view release on metacpan or search on metacpan
Revision history for Perl extension Catalyst-Action-RenderView
0.17 2024-10-12
- fix Makefile.PL to work without PERL_USE_UNSAFE_INC
- revised packaging to use Dist::Zilla
- drop unused prereq HTTP::Request::AsCGI
0.16 2011-01-05 19:28:00 GMT
- Fix bug accidentally introduced in the last version with response
3xx statuses.
view all matches for this distribution
view release on metacpan or search on metacpan
t/lib/Test/Rest.pm view on Meta::CPAN
{
url => { type => SCALAR },
headers => { type => HASHREF, default => {} },
},
);
my $req = HTTP::Request->new( "$method" => $p{'url'} );
$req->header( $_ => $p{headers}{$_} ) for keys %{ $p{headers} };
$req->content_type( $self->{'content_type'} );
return $req;
};
}
t/lib/Test/Rest.pm view on Meta::CPAN
url => { type => SCALAR },
data => 1,
headers => { type => HASHREF, default => {} },
},
);
my $req = HTTP::Request->new( "$method" => $p{'url'} );
$req->header( $_ => $p{headers}{$_} ) for keys %{ $p{headers} };
$req->content_type( $self->{'content_type'} );
$req->content_length(
do { use bytes; length( $p{'data'} ) }
);
view all matches for this distribution
view release on metacpan or search on metacpan
use strict;
use warnings FATAL => 'all';
use Test::More 0.89;
use HTTP::Request::Common qw/GET POST DELETE/;
use FindBin;
use lib "$FindBin::Bin/lib";
use TestApp;
view all matches for this distribution
view release on metacpan or search on metacpan
"Catalyst::Runtime" : "5.90013",
"Catalyst::ScriptRunner" : "0",
"Catalyst::Test" : "0",
"Data::Printer" : "0",
"FindBin::libs" : "0",
"HTTP::Request" : "0",
"JSON" : "0",
"JSON::XS" : "0",
"Net::Stomp" : "0",
"Test::Most" : "0",
"bytes" : "0"
view all matches for this distribution
view release on metacpan or search on metacpan
build_requires:
Catalyst: 0
Catalyst::Controller::ActionRole: 0
Catalyst::Test: 0
ExtUtils::MakeMaker: 6.59
HTTP::Request::Common: 0
Moose: 0
Test::More: '0.96'
configure_requires:
ExtUtils::MakeMaker: 6.59
distribution_type: module
view all matches for this distribution
view release on metacpan or search on metacpan
],
"build_requires" : {
"Catalyst::Controller::ActionRole" : "0",
"Catalyst::Test" : "0",
"FindBin" : "0",
"HTTP::Request::Common" : "0",
"Moose" : "1.03",
"Test::More" : "0.89"
},
"configure_requires" : {
"ExtUtils::MakeMaker" : "6.31"
view all matches for this distribution
view release on metacpan or search on metacpan
Release history for Catalyst-ActionRole-Methods
0.104 - 2024-03-21
- Support for HTTP::Request::Common < 6.21
0.103 - 2024-02-25
- Correct content type for the default 405 response
- Minor code cleanups and speedups
- Improved documentation
view all matches for this distribution
view release on metacpan or search on metacpan
MyApp->setup;
}
use Catalyst::Test 'MyApp';
use HTTP::Request::Common;
{
ok my $res = request(GET '/22?foo=44&bar=55&bar=66&baz=77');
}
view all matches for this distribution
view release on metacpan or search on metacpan
abstract: 'Constraints for your Query parameters'
author:
- 'John Napiorkowski <jjnapiork@cpan.org>'
build_requires:
Catalyst: '5.90103'
HTTP::Request::Common: '0'
Test::Most: '0'
Type::Tiny: '1.000005'
configure_requires:
ExtUtils::MakeMaker: '0'
dynamic_config: 0
view all matches for this distribution
view release on metacpan or search on metacpan
t/02_render.t view on Meta::CPAN
use FindBin qw($Bin);
use lib "$Bin/lib";
use Test::More;
use Catalyst::Test 'TestApp';
use HTTP::Request::Common;
use_ok('Catalyst::Test', 'TestApp');
# render TT
{
ok my $res = request GET '/render_tt';
view all matches for this distribution
view release on metacpan or search on metacpan
use FindBin;
use lib "$FindBin::Bin/lib";
use Test::More tests => 29;
use Catalyst::Test 'TestApp';
use HTTP::Request::Common;
ok( my $res = request('https://localhost/root_ssl'), 'request ok' );
is( $res->code, 200, 'SSL request to SSL' );
my $ctx;
view all matches for this distribution
view release on metacpan or search on metacpan
Catalyst::Plugin::Session::State::Cookie: 0
Catalyst::Plugin::Session::Store::Dummy: 0
Catalyst::Plugin::Static::Simple: 0
ExtUtils::MakeMaker: 6.59
HTTP::Cookies: 0
HTTP::Request::AsCGI: 0
Test::More: 0
configure_requires:
ExtUtils::MakeMaker: 6.59
distribution_type: module
dynamic_config: 1
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Catalyst/Authentication/Credential/Crowd.pm view on Meta::CPAN
use warnings;
our $VERSION = '0.07';
use Moose;
use HTTP::Request;
use LWP::UserAgent;
use JSON;
has 'authen_url' => (
is => 'ro',
lib/Catalyst/Authentication/Credential/Crowd.pm view on Meta::CPAN
my ( $self, $username, $password ) = @_;
my $ua = LWP::UserAgent->new;
my $uri = $self->authen_url."?username=$username";
my $json_hash = { value => $password };
my $json = to_json( $json_hash );
my $req = HTTP::Request->new( 'POST', $uri );
$req->authorization_basic(
$self->app->{app_name},
$self->app->{password}
);
$req->header('Accept' => 'application/json');
view all matches for this distribution
view release on metacpan or search on metacpan
t/live_app.t view on Meta::CPAN
eval { require Test::WWW::Mechanize::Catalyst }
or plan skip_all =>
"Test::WWW::Mechanize::Catalyst is needed for this test";
plan tests => 9;
}
use HTTP::Request;
{
package AuthTestApp;
use Catalyst qw/
Authentication
/;
t/live_app.t view on Meta::CPAN
is( $mech->status, 401, "status is 401" ) or die $mech->content;
$mech->content_lacks( "foo", "no output" );
}
{# HTTP with auth
my $r = HTTP::Request->new( GET => "http://localhost/moose" );
$r->authorization_basic(qw/foo s3cr3t/);
# $mech->request($r);
is( $mech->status, 200, "status is 200" );
$mech->content_contains( "test realm:foo", "test realm:foo output" );
}
{ # HTTP with other auth
my $r = HTTP::Request->new( GET => "http://localhost/moose" );
$r->authorization_basic(qw/foo proxypass/);
# $mech->request($r);
is( $mech->status, 401, "status is 401" ) or die $mech->content;
}
}
t/live_app.t view on Meta::CPAN
is( $mech->status, 401, "status is 401" ) or die $mech->content;
$mech->content_lacks( "foo", "no output" );
}
{ # Proxy with other auth
my $r = HTTP::Request->new( GET => "http://localhost/yak" );
$r->authorization_basic(qw/foo s3cr3t/);
# $mech->request($r);
is( $mech->status, 401, "status is 401" ) or die $mech->content;
}
{ # HTTP with other auth
my $r = HTTP::Request->new( GET => "http://localhost/yak" );
$r->authorization_basic(qw/foo proxypass/);
# $mech->request($r);
is( $mech->status, 200, "status is 200" );
$mech->content_contains( "test_proxy realm:foo", "test_proxy realm:foo output" );
}
view all matches for this distribution
view release on metacpan or search on metacpan
"requires" : {
"Catalyst::Controller" : "0",
"File::Spec" : "0",
"FindBin" : "0",
"HTTP::Headers" : "0",
"HTTP::Request" : "0",
"Module::Metadata" : "0",
"Test::Exception" : "0",
"Test::MockObject" : "0",
"Test::MockObject::Extends" : "0",
"Test::More" : "0",
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Catalyst/Authentication/Credential/OAuth.pm view on Meta::CPAN
use MooseX::Types::Moose qw/ Bool HashRef /;
use MooseX::Types::Common::String qw/ NonEmptySimpleStr /;
use Net::OAuth;
#$Net::OAuth::PROTOCOL_VERSION = Net::OAuth::PROTOCOL_VERSION_1_0A;
use LWP::UserAgent;
use HTTP::Request::Common;
use String::Random qw/ random_string /;
use Catalyst::Exception ();
use namespace::autoclean;
our $VERSION = '0.04';
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Catalyst/Authentication/Store/Crowd.pm view on Meta::CPAN
use warnings;
use Moose;
use LWP::UserAgent;
use HTTP::Request;
use JSON;
use Catalyst::Authentication::Store::Crowd::User;
has 'find_user_url' => (
lib/Catalyst/Authentication/Store/Crowd.pm view on Meta::CPAN
sub _crowd_get_user {
my ( $self, $username ) = @_;
my $ua = LWP::UserAgent->new;
my $uri = $self->find_user_url."?username=$username";
my $req = HTTP::Request->new( 'GET', $uri );
$req->authorization_basic(
$self->app->{app_name},
$self->app->{password}
);
$req->header('Accept' => 'application/json');
view all matches for this distribution