File Coverage

blib/lib/DBD/PO.pm
Criterion Covered Total %
statement 10 12 83.3
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 14 16 87.5


line stmt bran cond sub pod time code
1             package DBD::PO;
2            
3 16     16   509114 use strict;
  16         192  
  16         708  
4 16     16   95 use warnings;
  16         30  
  16         1191  
5            
6             our $VERSION = '2.10';
7             our $ATTRIBUTION = __PACKAGE__
8             . ' by Steffen Winkler ';
9            
10 16     16   2771 use parent qw(DBD::File);
  16         944  
  16         127  
11            
12 16     16   4875938 use DBD::PO::dr;
  0            
  0            
13             use DBD::PO::db;
14             use DBD::PO::Statement;
15             use DBD::PO::Table;
16             use DBD::PO::st;
17             use DBD::PO::Text::PO;
18            
19             sub init {
20             my (undef, @params) = @_;
21            
22             return DBD::PO::Text::PO->init(@params);
23             }
24            
25             sub get_all_header_keys {
26             return DBD::PO::db->get_all_header_keys();
27             }
28            
29             1;
30            
31             __END__