File Coverage

blib/lib/POSIX/strptime.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package POSIX::strptime;
2              
3 1     1   1072 use 5.000;
  1         4  
4 1     1   6 use strict;
  1         2  
  1         21  
5              
6 1     1   7 use XSLoader;
  1         2  
  1         30  
7 1     1   6 use vars qw($VERSION @ISA @EXPORT_OK);
  1         2  
  1         177  
8              
9             $VERSION = '0.12';
10              
11             require Exporter;
12             @ISA = qw(Exporter);
13             @EXPORT_OK = qw(strptime);
14              
15             XSLoader::load __PACKAGE__, $VERSION;
16              
17             if (not defined &POSIX::strptime) {
18             *POSIX::strptime = \&strptime;
19             }
20              
21             # Preloaded methods go here.
22              
23             1;
24             __END__