view release on metacpan or search on metacpan
lib/HTTP/MultiGet/Role.pm view on Meta::CPAN
use Moo;
BEGIN { with 'HTTP::MultiGet::Role' }
sub que_some_request {
my ($self,$cb)=@_;
my $request=HTTP::Request->new(GET=>'https://some_json_endpoint');
return $self->queue_request($request,$cb);
}
Blocking Example
view release on metacpan or search on metacpan
script/oai_pmh.pl view on Meta::CPAN
=back
=head1 DESCRIPTION
Retrieve data from OAI-PMH endpoints. The output format is:
<headers>
<content>
<FORMFEED>
view release on metacpan or search on metacpan
lib/HTTP/Promise/Headers.pm view on Meta::CPAN
See L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/HTTP/Headers/Content-Security-Policy>
=head2 content_security_policy_report_only
# Content-Security-Policy-Report-Only: default-src https:; report-uri /csp-violation-report-endpoint/
Sets or gets the C<Content-Security-Policy-Report-Only> header field value. It takes a string value of properly formatted header value.
See also L<HTTP::Promise::Headers::ContentSecurityPolicyReportOnly> to have a more granular control.
view release on metacpan or search on metacpan
examples/send.pl view on Meta::CPAN
my $server_key = { public => 'BCAI00zPAbxEVU5w8D1kZXVs2Ro--FmpQNMOd0S0w1_5naTLZTGTYNqIt7d97c2mUDstAWOCXkNKecqgS4jARA8',
private => 'M6xy5prDBhJNlOGnOkMekyAQnQSWKuJj1cD06SUQTow'};
my $send=HTTP::Request::Webpush->new();
$send->subscription('{"endpoint":"https://bn3p.notify.windows.com/w/?token=BQYAAACgmmGJB%2fT6GgtS%2bZsefznjZgOG1kd2d05B80MIiQ%2fn5JKOOjrE7Bep8JYJoqRiAW67%2fyoq69DRfLFaZHxhBiYbWh6HfdUd0SbAAwe6%2fvk0ClM0a4%2bEfX0fzUflmVix%2fV8uM1lFqVidtOLLs20lnWw%2bH5N...
$send->subject('mailto:esf@moller.cl');
$send->authbase64($server_key->{public}, $server_key->{private});
$send->content("Billy Jean's not my lover");
$send->encode;
$send->header('TTL' => '90');
view release on metacpan or search on metacpan
lib/HTTP/Upload/FlowJs.pm view on Meta::CPAN
library that uploads
a file in multiple parts. It requires two API points on the server side,
one C<GET> API point to check whether a part already has been uploaded
completely and one C<POST> API point to send the data of each partial
upload to. This Perl module implements the backend functionality for
both endpoints. It does not implement the handling of the HTTP requests
themselves, but you likely already use a framework like L<Mojolicious>
or L<Dancer> for that.
=head1 METHODS
view release on metacpan or search on metacpan
lib/Hadoop/HDFS/Command.pm view on Meta::CPAN
down below).
You can always use the WebHDFS to do similar operations instead of failling
back to the commandline. However there are several benefits of using the
cli; i) you'll end up with a single C<JVM> invocation, so the response
might be faster ii) Some functionality / endpoints might be buggy for WebHDFS
but might work with the cli (for example escaping certain values is broken
in some versions, but works with the cli).
=head1 NAME
view release on metacpan or search on metacpan
t/lib/Hailo/Test/TimToady.trn view on Meta::CPAN
I don't think anyone can look at 0..* and not grok it.
s/anyone/anyone not seriously damaged by earlier exposure to computer culture. :)/
Make me one with *..*
In a selector when you're too lazy to say Num.
that's another reason for it. 'a'..*
the endpoint is *not* Inf.
It's...its...er...
Whatever.
Sorry, I already called the colon.
Whatever...
right.
t/lib/Hailo/Test/TimToady.trn view on Meta::CPAN
as can all(@foo) if it's false
or none(@foo) if it's true
nothing like that
well, that's exactly what $0 is...
I doubt .. would know what to do with StrPos, but StrPos might figure out what to do with ..
and .. could exclude the endpoints. :)
I once had a font with square periods...
i wasn't making fun of your bad English
I was making a pun.
I do that sometimes...
unfortunately...
t/lib/Hailo/Test/TimToady.trn view on Meta::CPAN
since it's something that has to be known at compile time.
so I'm just going to delete it.
putter: note in my message I'm thinking about changing it to lazy flattening undoable by @@
you can ignore the symbol stuff in S05, it's already obsolete
in fact, I just now deleted it
Range.max just returns the endpoint, ignoring :by
so pugs is correct
Schwern++
the "Perl 7" discussion, I think
not to mention the strange regex ideas
There's little wrong with Perl 5 today that wasn't already wrong in 2000 when 361 RFCs were written...
t/lib/Hailo/Test/TimToady.trn view on Meta::CPAN
actually, that section implies that .succ is not used for ++ on strings, hmm...
that's specced, though
see S03:2029
why would you want to in increment kana?
it's not like the codepoints follow the a,i,u,e,o song... :)
you can still use it as a Range, as in testing cmp its endpoints
but cmp has nothing to do with .succ, really
yes, and then if you do something non-sensical, you get a lot of nonsense :)
the test is supposed to be !after, which matches eqv
or the other way around
anyway, a direct hit is suppose to stop it
view release on metacpan or search on metacpan
Word/noun.txt view on Meta::CPAN
endoscopy,endoscopies
endothelin,endothelins
endotoxin,endotoxins
endowment,endowments
endpaper,endpapers
endpoint,endpoints
enema,enemas
enemy,enemies
energetic,energetics
energy,energies
enfant,enfants
view release on metacpan or search on metacpan
lib/HealthCheck/Diagnostic/RemoteHealth.pm view on Meta::CPAN
version v0.1.2
=head1 SYNOPSIS
Returns the decoded JSON object from a HTTP HealthCheck endpoint.
$health_check->register(
HealthCheck::Diagnostic::RemoteHealth->new(
url => "https://example.com/healthz",
)
);
=head1 DESCRIPTION
Takes in a C<url> to a HealthCheck JSON endpoint
and checks to see if a connection can be made.
If the connection fails or the JSON object cannot be decoded,
the C<status> is set to "CRITICAL".
If both the connection succeeds and the JSON object is successfully decoded,
it returns the decoded JSON object from the remote endpoint.
=head1 ATTRIBUTES
This diagnostic inherits all attributes from
L<HealthCheck::Diagnostic::WebRequest> in addition to its own.
C<status_code> is by default set to "200, 503".
=head2 url
The URL to the remote HealthCheck JSON endpoint. This typically ends in
"I</healthz>".
=head1 DEPENDENCIES
=over 4
view release on metacpan or search on metacpan
lib/HealthCheck.pm view on Meta::CPAN
#pod
#pod =over
#pod
#pod =item *
#pod
#pod A fast HTTP endpoint that can be used to verify that a web app can
#pod serve traffic.
#pod To this end, it may be useful to use the runtime support option,
#pod available in L<HealthChecks::Diagnostic>.
#pod
#pod =item *
lib/HealthCheck.pm view on Meta::CPAN
=over
=item *
A fast HTTP endpoint that can be used to verify that a web app can
serve traffic.
To this end, it may be useful to use the runtime support option,
available in L<HealthChecks::Diagnostic>.
=item *
view release on metacpan or search on metacpan
helios_config_get view on Meta::CPAN
=head1 SYNOPSIS
helios_config_get --service=<service name> [--hostname=<hostname>] --param=<param name>
# get the value of the "endpoint_url" param for MyService on the current host
helios_config_get --service=MyService --param=endpoint_url
# get the global MAX_WORKERS setting for MyService
# (-H is a shortcut for --hostname)
helios_config_get -s MyService -H=* -p MAX_WORKERS
view release on metacpan or search on metacpan
lib/Hetula/Client.pm view on Meta::CPAN
=head2 API Access methods
=head3 login
See Hetula API doc for endpoint POST /api/v1/auth
@param1 {HASHRef} username => String || undef if given via credentials during construction,
password => String || undef if given via credentials during construction,
organization => String || undef if given via credentials during construction,
lib/Hetula/Client.pm view on Meta::CPAN
return _handleResponse($tx);
}
=head3 ssnAdd
See Hetula API doc for endpoint POST /api/v1/ssns
=cut
sub ssnAdd($s, $params) {
my $tx = $s->ua->post( $s->baseURL().'/api/v1/ssns', {Accept => '*/*'}, json => $params );
return _handleResponse($tx);
}
=head3 ssnGet
See Hetula API doc for endpoint GET /api/v1/users/<id>
@param1 {HASHRef} id => ssn id to get
=cut
lib/Hetula/Client.pm view on Meta::CPAN
return _handleResponse($tx);
}
=head3 ssnsBatchAdd
See Hetula API doc for endpoint GET /api/v1/ssns/batch
@param1 {ARRAYRef} of ssns
=cut
lib/Hetula/Client.pm view on Meta::CPAN
$s->ssnsBatchAddChunked($feeder, $digester);
}
=head3 userAdd
See Hetula API doc for endpoint POST /api/v1/users
=cut
sub userAdd($s, $params) {
my $tx = $s->ua->post( $s->baseURL().'/api/v1/users', {Accept => '*/*'}, json => $params );
lib/Hetula/Client.pm view on Meta::CPAN
return $s->userAdd($params);
}
=head3 userMod
See Hetula API doc for endpoint PUT /api/v1/users/<id>
@param {HASHRef} username or id => mandatory,
other patron attributes => and values,
...
view release on metacpan or search on metacpan
{
"abstract" : "Simple REST endpoint app for db backend build with Plack and DBIC",
"author" : [
"Tomasz Czepiel <tjmc@cpan.org>"
],
"dynamic_config" : 1,
"generated_by" : "ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.133380",
view release on metacpan or search on metacpan
lib/Hypersonic.pm view on Meta::CPAN
sub del { shift->_add_route('DELETE', @_) }
sub patch { shift->_add_route('PATCH', @_) }
sub head { shift->_add_route('HEAD', @_) }
sub options { shift->_add_route('OPTIONS', @_) }
# Health check endpoint - built-in route for load balancer / k8s probes
sub health_check {
my ($self, $path, $handler) = @_;
$path //= '/health';
# Default handler returns JSON string (JIT compiled as constant)
lib/Hypersonic.pm view on Meta::CPAN
};
return $self->get($path => $handler);
}
# Readiness check endpoint - separate from health for k8s
sub ready_check {
my ($self, $path, $handler) = @_;
$path //= '/ready';
$handler //= sub {
view release on metacpan or search on metacpan
lib/ICC/Shared.pm view on Meta::CPAN
$rhs->[$i - 1][$i] = 3;
$rhs->[$i + 1][$i] = -3;
}
# set endpoint values
$rhs->[0][0] = -3;
$rhs->[1][0] = -3;
$rhs->[$ix][$ix] = 3;
$rhs->[$ix - 1][$ix] = 3;
lib/ICC/Shared.pm view on Meta::CPAN
$rhs->[$i - 1][$i] = 3;
$rhs->[$i + 1][$i] = -3;
}
# set endpoint values
$rhs->[0][0] = -3;
$rhs->[1][0] = -3;
$rhs->[$ix][$ix] = 3;
$rhs->[$ix - 1][$ix] = 3;
view release on metacpan or search on metacpan
lib/IO/Iron/IronMQ/Client.pm view on Meta::CPAN
Get push status for a message. Retrieve the push status for a
particular message which will let you know which subscribers
have received the message, which have failed, how many times
it's tried to be delivered and the status code returned from
the endpoint.
my $info = $iron_mq_queue->get_push_statuses( 'id' => $msg_id );
my @subscribers = (@{info->{'subscribers'}});
Acknowledge / Delete Push Message for a Subscriber.
view release on metacpan or search on metacpan
lib/IO/K8s.pm view on Meta::CPAN
my $k8s = IO::K8s->new(with => ['IO::K8s::Cilium']);
my $cnp = $k8s->new_object('CiliumNetworkPolicy',
metadata => { name => 'allow-dns', namespace => 'kube-system' },
spec => { endpointSelector => { matchLabels => { app => 'dns' } } },
);
print $cnp->to_yaml;
All Cilium kinds are C<Cilium>-prefixed, so there are no collisions with