App-MultiModule-Tasks-HTTPClient
view release on metacpan or search on metacpan
generated_by: 'Dist::Zilla version 5.047, CPAN::Meta::Converter version 2.150001'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: '1.4'
name: App-MultiModule-Tasks-HTTPClient
requires:
App::MultiModule::Task: '0'
App::MultiModule::Test: '0'
Data::Dumper: '0'
HTTP::Request: '0'
Modern::Perl: '0'
POE: '0'
POE::Component::Client::HTTP: '0'
Storable: '0'
Test::More: '0'
parent: '0'
perl: '5.006'
strict: '0'
warnings: '0'
resources:
Makefile.PL view on Meta::CPAN
"ExtUtils::MakeMaker" => 0
},
"DISTNAME" => "App-MultiModule-Tasks-HTTPClient",
"LICENSE" => "perl",
"MIN_PERL_VERSION" => "5.006",
"NAME" => "App::MultiModule::Tasks::HTTPClient",
"PREREQ_PM" => {
"App::MultiModule::Task" => 0,
"App::MultiModule::Test" => 0,
"Data::Dumper" => 0,
"HTTP::Request" => 0,
"Modern::Perl" => 0,
"POE" => 0,
"POE::Component::Client::HTTP" => 0,
"Storable" => 0,
"Test::More" => 0,
"parent" => 0,
"strict" => 0,
"warnings" => 0
},
"TEST_REQUIRES" => {
Makefile.PL view on Meta::CPAN
}
);
my %FallbackPrereqs = (
"App::MultiModule::Task" => 0,
"App::MultiModule::Test" => 0,
"Data::Dumper" => 0,
"File::Slurp" => 0,
"File::Temp" => 0,
"HTTP::Request" => 0,
"IPC::Transit" => 0,
"Modern::Perl" => 0,
"POE" => 0,
"POE::Component::Client::HTTP" => 0,
"POSIX" => 0,
"Storable" => 0,
"Test::More" => 0,
"lib" => 0,
"parent" => 0,
"strict" => 0,
lib/App/MultiModule/Tasks/HTTPClient.pm view on Meta::CPAN
package App::MultiModule::Tasks::HTTPClient;
$App::MultiModule::Tasks::HTTPClient::VERSION = '1.161230';
use 5.006;
use strict;
use warnings FATAL => 'all';
use POE qw(Component::Client::HTTP);
use HTTP::Request;
use Modern::Perl;
use Data::Dumper;
use Storable;
use parent 'App::MultiModule::Task';
=head1 NAME
App::MultiModule::Tasks::HTTPClient - Do http/httpds requests in MultiModule
lib/App/MultiModule/Tasks/HTTPClient.pm view on Meta::CPAN
$self->emit($message);
};
POE::Session->create(
inline_states => {
_start => sub {
POE::Kernel->post(
$url, # posts to the 'ua' alias
'request', # posts to ua's 'request' state
'response', # which of our states will receive the response
HTTP::Request->new(GET => $message->{http_url}),# an HTTP::Request object
);
},
_stop => sub {},
response => $response_handler,
},
);
}
}
=head2 set_config
( run in 0.365 second using v1.01-cache-2.11-cpan-de7293f3b23 )