File Coverage

blib/lib/oEdtk.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 1 0.0
total 21 22 95.4


line stmt bran cond sub pod time code
1             package oEdtk ;
2            
3             BEGIN {
4 1     1   5 use Exporter;
  1         2  
  1         48  
5 1     1   5 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); # %EXPORT_TAGS);
  1         1  
  1         60  
6 1     1   4 use strict;
  1         2  
  1         55  
7            
8             # a.ammr a.a année d'existence, mm mois, r release
9 1     1   2 $VERSION = 0.8052;
10 1         1 my $YEAR = '2013';
11 1         12 @ISA = qw(Exporter);
12 1         67 @EXPORT = qw(oEdtk_release);
13             }
14            
15             #
16             # CODE - DOC AT THE END
17             #
18            
19             sub oEdtk_release {
20             # warn "DEBUG: >$?< \nDEBUG: >$@<\n";
21 1     1 0 24 return "\n(c) 2005-2013 daunay\@cpan.org - edtk\@free.fr - oEdtk v$VERSION\n";
22             }
23            
24            
25             END {
26 1     1   134 warn oEdtk_release();
27             }
28            
29             1;
30            
31             __END__