File Coverage

blib/lib/PayProp/API/Public/Client/Role/Attribute/UA.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package PayProp::API::Public::Client::Role::Attribute::UA;
2              
3 31     31   353856 use strict;
  31         88  
  31         1249  
4 31     31   154 use warnings;
  31         57  
  31         3757  
5              
6 31     31   1271 use Mouse::Role;
  31         3318  
  31         267  
7 31     31   31316 use Mojo::UserAgent;
  31         5017740  
  31         297  
8              
9              
10             has ua => (
11             is => 'ro',
12             isa => 'Mojo::UserAgent',
13             lazy => 1,
14             default => sub {
15             my $UA = Mojo::UserAgent->new
16             ->insecure(1)
17             ->max_redirects(1)
18             ->connect_timeout(10)
19             ->inactivity_timeout(10)
20             ;
21              
22             $UA->transactor->name('PayProp API Client');
23              
24             return $UA;
25             },
26             );
27              
28             1;