File Coverage

blib/lib/Bundle/CommonModules.pm
Criterion Covered Total %
statement 9 11 81.8
branch n/a
condition n/a
subroutine 3 5 60.0
pod 0 2 0.0
total 12 18 66.6


line stmt bran cond sub pod time code
1             package Bundle::CommonModules;
2              
3 1     1   33863 use 5.008003;
  1         7  
  1         80  
4 1     1   7 use strict;
  1         2  
  1         43  
5 1     1   8 use warnings;
  1         6  
  1         429  
6              
7             require Exporter;
8              
9             our @ISA = qw(Exporter);
10              
11             # Items to export into callers namespace by default. Note: do not export
12             # names by default without a very good reason. Use EXPORT_OK instead.
13             # Do not simply export all your public functions/methods/constants.
14              
15             # This allows declaration use Bundle::CommonModules ':all';
16             # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
17             # will save memory.
18             our %EXPORT_TAGS = ( 'all' => [ qw(
19             &printYouAreNotDone
20             &printYouAreDone
21             ) ] );
22            
23             #our @EXPORT_OK = qw(printYouAreDone printYouAreNotDone);
24             our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
25              
26             our @EXPORT = qw(
27             );
28              
29             our $VERSION = '1.03';
30              
31             # Preloaded methods go here.
32              
33 0     0 0   sub printYouAreNotDone { print "You Are NOT Done.\n"; }
34 0     0 0   sub printYouAreDone { print "You Are Done!\n"; }
35              
36             1;
37              
38             __END__