Help language development. Donate to The Perl Foundation
HTTP::Tinyish - Raku port of HTTP::Tinyish
Synchronous way:
my $http = HTTP::Tinyish.new(agent => "Mozilla/4.0"); my %res = $http.get("http://www.cpan.org/"); warn %res<status>; $http.post: "http://example.com/post", headers => { "Content-Type" => "application/x-www-form-urlencoded" }, content => "foo=bar&baz=quux", ; $http.mirror: "http://www.cpan.org/modules/02packages.details.txt.gz", "./02packages.details.txt.gz", ;
Asynchronous way:
my $http = HTTP::Tinyish.new(:async); my @url = < https://raku.org/ https://doc.raku.org/ https://design.raku.org/ >; my @promise = @url.map: -> $url { $http.get($url).then: -> $promise { my %res = $promise.result; say "Done %res<status> %res<url>"; %res; }; }; my @res = await @promise;
HTTP::Tinyish is a Raku port of https://github.com/miyagawa/HTTP-Tinyish. Currently only support curl.
Raku distinguishes Str from Buf. HTTP::Tinyish handles data as Str by default (that is, encode/decode utf-8 if needed by default). If you want to handle data as Buf, please follow the instruction below.
If you want to send Buf content, just specify Buf in content:
my $binary-data = "file.bin".IO.slurp(:bin); $http.post: "http://example.com/post", content => $binary-data, ;
If you want to recieve http content as Buf, then call request/get/post/... method with bin => True
:
my %res = $http.get("http://example.com/image.png", bin => True); does-ok %res<content>, Buf; # pass
And decode %res<content>
by yourself if you want.
Copyright 2015 Shoichi Kaji [email protected]
This library is free software; you can redistribute it and/or modify it under the Artistic License 2.0.
Original perl5 HTTP::Tinyish COPYRIGHT and LICENSE:
COPYRIGHT
Tatsuhiko Miyagawa, 2015-
LICENSE
This module is licensed under the same terms as Perl itself.