Yet Another CPAN Grep

HTTP-Simple ( D/DB/DBOOK/HTTP-Simple-0.004.tar.gz, DBOOK, 2019; MetaCPAN )

HTTP-Simple/lib/HTTP/Simple.pm ( view source; MetaCPAN )

e HTTP::Tiny;

our $VERSION = '0.004';

my @request_functions = qw(get getjson head getprint getstore mirror postform postjson postfile);
my @status_functions = qw(is_info is_success is_redirect is_er

nt => "HTTP::Simple/$VERSION");

our $JSON;
{
  local $@;
  if (eval { require Cpanel::JSON::XS; Cpanel::JSON::XS->VERSION('4.11'); 1 }) {
    $JSON = Cpanel::JSON::XS->new->utf8->canonical->allow_non

ref->convert_blessed->allow_dupkeys;
  }
}
unless (defined $JSON) {
  require JSON::PP;
  $JSON = JSON::PP->new->utf8->canonical->allow_nonref->convert_blessed;
}

sub get {
  my ($url) = @_;
  my $re