File Coverage

blib/lib/Net/Mailboxlayer/Response.pm
Criterion Covered Total %
statement 6 23 26.0
branch n/a
condition n/a
subroutine 2 17 11.7
pod 15 15 100.0
total 23 55 41.8


line stmt bran cond sub pod time code
1             package Net::Mailboxlayer::Response;
2              
3 1     1   3 use strict;
  1         1  
  1         23  
4 1     1   3 use warnings;
  1         1  
  1         239  
5              
6             $Net::Mailboxlayer::Response::VERSION = '0.001';
7              
8             sub new
9             {
10 0     0 1   my ($class, %props) = @_;
11 0           my $self = bless \%props, $class;
12 0           return $self;
13             }
14              
15 0     0 1   sub has_error {return 0}
16 0     0 1   sub email {return $_[0]->{email}}
17 0     0 1   sub did_you_mean {return $_[0]->{did_you_mean}}
18 0     0 1   sub user {return $_[0]->{user}}
19 0     0 1   sub domain {return $_[0]->{domain}}
20 0     0 1   sub format_valid {return $_[0]->{format_valid}}
21 0     0 1   sub mx_found {return $_[0]->{mx_found}}
22 0     0 1   sub smtp_check {return $_[0]->{smtp_check}}
23 0     0 1   sub catch_all {return $_[0]->{catch_all}}
24 0     0 1   sub role {return $_[0]->{role}}
25 0     0 1   sub disposable {return $_[0]->{disposable}}
26 0     0 1   sub free {return $_[0]->{free}}
27 0     0 1   sub score {return $_[0]->{score}}
28 0     0 1   sub response {return $_[0]->{_response}}
29              
30             1;
31              
32             __END__