File Coverage

blib/lib/WebService/NFSN/Email.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 18 18 100.0


line stmt bran cond sub pod time code
1             #---------------------------------------------------------------------
2             package WebService::NFSN::Email;
3             #
4             # Copyright 2010 Christopher J. Madsen
5             #
6             # Author: Christopher J. Madsen
7             # Created: 3 Apr 2007
8             #
9             # This program is free software; you can redistribute it and/or modify
10             # it under the same terms as Perl itself.
11             #
12             # This program is distributed in the hope that it will be useful,
13             # but WITHOUT ANY WARRANTY; without even the implied warranty of
14             # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See either the
15             # GNU General Public License or the Artistic License for more details.
16             #
17             # ABSTRACT: Access NFSN email forwarding
18             #---------------------------------------------------------------------
19              
20 1     1   1362 use 5.006;
  1         4  
  1         45  
21 1     1   6 use strict;
  1         1  
  1         31  
22 1     1   6 use warnings;
  1         3  
  1         28  
23              
24 1     1   5 use parent 'WebService::NFSN::Object';
  1         2  
  1         7  
25              
26             #=====================================================================
27             # Package Global Variables:
28              
29             our $VERSION = '1.03'; # VERSION
30              
31             #=====================================================================
32             BEGIN {
33 1     1   121 __PACKAGE__->_define(
34             type => 'email',
35             methods => {
36             'listForwards:JSON' => [],
37             removeForward => [qw(forward)],
38             setForward => [qw(forward dest_email)],
39             }
40             );
41             } # end BEGIN
42              
43             #=====================================================================
44             # Package Return Value:
45              
46             1;
47              
48             __END__