File Coverage

blib/lib/Data/Validate/Email.pm
Criterion Covered Total %
statement 43 43 100.0
branch 21 26 80.7
condition 1 3 33.3
subroutine 9 9 100.0
pod 4 4 100.0
total 78 85 91.7


line stmt bran cond sub pod time code
1             package Data::Validate::Email;
2              
3 4     4   37522 use strict;
  4         26  
  4         109  
4 4     4   18 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
  4         6  
  4         228  
5              
6             require Exporter;
7 4     4   1077 use AutoLoader 'AUTOLOAD';
  4         4145  
  4         19  
8              
9 4     4   1173 use Email::Address;
  4         83006  
  4         184  
10 4     4   980 use Data::Validate::Domain;
  4         37022  
  4         358  
11              
12             @ISA = qw(Exporter);
13              
14              
15              
16             # no functions are exported by default. See EXPORT_OK
17             @EXPORT = qw();
18              
19             @EXPORT_OK = qw(
20             is_email
21             is_email_rfc822
22             is_domain
23             is_username
24             );
25              
26             %EXPORT_TAGS = ();
27              
28             $VERSION = '0.06';
29              
30              
31             # No preloads
32              
33             1;
34             __END__