Web user agent class for Perl 6.
use HTTP::UserAgent;
my $ua = HTTP::UserAgent.new;
$ua.timeout = 10;
try my $response = $ua.get("URL");
if $response.is-success {
say $response.content;
} else {
die $response.status-line;
}
See specific files.
strikethrough text means done.
- clean up
- speed up
##HTTP::UserAgent
HTTP Auth- let user set his own cookie jar
make getprint() return the code responsesecurity fix - use File::Temp to create temporary cookie jar- use Promises
make SSL dependency as optional
##HTTP::Cookies
- path restriction
##OpenSSL
fix NativeCall's int bug- make it work on more platforms
##IO::Socket::SSL
- make it work on more platforms
- make SSL support more reliable
- add throwing exception on failing SSL
- more tests