view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

0.07 - 2014-08-22T14:00:00+01:00

  [ENHANCEMENTS]

  - Make Acme::HTTP require Net::HTTP/S::NB dynamically

0.06 - 2014-08-22T12:00:00+01:00

  [REFACTORING]

  - Refactor Acme::HTTP, make new return a correctly blessed Acme::HTTP object
    Data abstraction, hide package variables (such as $Acme::HTTP::Code) using
    getter and setter subroutines

0.05 - 2014-08-21T12:00:00+01:00

  [ENHANCEMENTS]

  - Replace Net::HTTP  by Net::HTTP::NB
    Replace Net::HTTPS by Net::HTTPS::NB

lib/Acme/HTTP.pm  view on Meta::CPAN

        }

        $url = $Response{'Location'};
    }

    unless (defined $hdl) {
        $@ = 'Acme::HTTP - Internal error, hdl is undefined';
        return;
    }

    bless { hdl => $hdl };
}

sub read_entity_body {
    my $self = shift;

    my $hdl = $self->{'hdl'};
    my $sel = IO::Select->new($hdl);

    unless ($sel->can_read($Acme::HTTP::TimeOut)) {
        $@ = 'Timeout ('.$Acme::HTTP::TimeOut.' sec)';