File Coverage

blib/lib/Email/AutoReply/Recipient.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Email::AutoReply::Recipient;
2             our $rcsid = '$Id: Recipient.pm 3002 2008-06-05 20:23:24Z adam $';
3              
4 1     1   6 use strict;
  1         1  
  1         37  
5 1     1   6 use warnings;
  1         1  
  1         26  
6              
7 1     1   5 use Spiffy '-Base';
  1         2  
  1         6  
8 1     1   385  
  1     1   2  
  1         22  
  1         4  
  1         2  
  1         54  
9             =head1 NAME
10              
11             Email::AutoReply::Recipient - recipient of an autoreply
12              
13             =head1 DESCRIPTION
14              
15             This simple object wraps a recipient of an L autoresponse.
16              
17             =head2 ATTRIBUTES
18              
19             =over 4
20              
21             =item B
22              
23             Set/get the email address of this recipient. Expect the value to be something
24             like C, ie: an email address without any decorations.
25              
26             =cut
27              
28             field 'email';
29              
30             =item B
31              
32             Set/get the timestamp for this recipient. This is a UNIX timestamp
33             (seconds since the epoch) representing when this person received an
34             autoresponse.
35              
36             =cut
37              
38             field 'timestamp';
39              
40             return 1;
41              
42             __END__