File Coverage

blib/lib/URI/monetdb.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 3 33.3
total 14 16 87.5


line stmt bran cond sub pod time code
1             package URI::monetdb;
2 2     2   2455 use base 'URI::_db';
  2         6  
  2         365  
3             our $VERSION = '0.20';
4              
5 36     36 1 15297 sub default_port { 50000 }
6 2     2 0 7 sub dbi_driver { 'monetdb' }
7 40     40 0 16812 sub canonical_engine { 'monetdb' }
8              
9             sub _dbi_param_map {
10 6     6   20 my $self = shift;
11             # DBD::monetdb had no database name support.
12             return (
13 6         18 [ host => scalar $self->host ],
14             [ port => scalar $self->_port ],
15             );
16             }
17              
18             1;