File Coverage

blib/lib/Date/Easy.pm
Criterion Covered Total %
statement 29 29 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod n/a
total 38 38 100.0


line stmt bran cond sub pod time code
1             package Date::Easy;
2              
3 15     15   1366637 use strict;
  15         134  
  15         354  
4 15     15   65 use warnings;
  15         18  
  15         277  
5 15     15   5818 use autodie;
  15         190550  
  15         57  
6              
7             our $VERSION = '0.09_01'; # TRIAL VERSION
8              
9 15     15   89895 use Date::Easy::Date ();
  15         47  
  15         346  
10 15     15   77 use Date::Easy::Datetime ();
  15         25  
  15         169  
11 15     15   6278 use Date::Easy::Units ();
  15         33  
  15         337  
12              
13 15     15   81 use Exporter;
  15         24  
  15         452  
14 15     15   69 use parent 'Exporter';
  15         20  
  15         48  
15             our @EXPORT = ( @Date::Easy::Date::EXPORT_OK, @Date::Easy::Datetime::EXPORT_OK, @Date::Easy::Units::EXPORT_OK, );
16              
17              
18             sub import
19             {
20 14     14   1186 Date::Easy::Date->import(':all');
21 14         103 Date::Easy::Datetime->import(':all', @_[1..$#_]);
22 14         881 Date::Easy::Units->import(':all');
23 14         45 @_ = (shift); # throw away all args except the first (package name)
24 14         11673 goto &Exporter::import;
25             }
26              
27              
28              
29             1;
30              
31              
32              
33             # ABSTRACT: easy dates with Time::Piece compatibility
34             # COPYRIGHT
35              
36             __END__