File Coverage

blib/lib/Net/Minecraft/Role/HTTP.pm

Criterion	Covered	Total	%
statement	16	16	100.0
branch			n/a
condition			n/a
subroutine	6	6	100.0
pod			n/a
total	22	22	100.0

use v5.16;
use warnings;

package Net::Minecraft::Role::HTTP {

  # ABSTRACT: Base class for Minecraft C things.


  use Moo::Role;
  use HTTP::Tiny;
  use Scalar::Util qw( blessed );


  has user_agent => (
    is      => rwp =>,
    lazy    => 1,
    default => sub {
      my $class = $_[0];
      $class = blessed($class) if blessed($class);
      my $version = $class->VERSION;
      $version = 'DEVEL' if not defined $version;
      return sprintf q{%s/%s}, $class, $version;
    },
  );


  has http_headers => ( is => rwp =>, lazy => 1, default => sub { { 'Content-Type' => 'application/x-www-form-urlencoded' } }, );


  has http_engine => ( is => rwp =>, lazy => 1, default => sub { return HTTP::Tiny->new( agent => $_[0]->user_agent ) }, );

};
BEGIN {
  $Net::Minecraft::Role::HTTP::AUTHORITY = 'cpan:KENTNL';
}
{
  $Net::Minecraft::Role::HTTP::VERSION = '0.002000';
}

1;

__END__