File Coverage

blib/lib/OPM/Maker/Command/dbtest.pm
Criterion Covered Total %
statement 19 19 100.0
branch 2 2 100.0
condition n/a
subroutine 8 8 100.0
pod 4 4 100.0
total 33 33 100.0


line stmt bran cond sub pod time code
1             package OPM::Maker::Command::dbtest;
2             $OPM::Maker::Command::dbtest::VERSION = '1.17';
3             # ABSTRACT: Test db definitions in .sopm files
4              
5 17     17   10600 use strict;
  17         36  
  17         440  
6 17     17   74 use warnings;
  17         31  
  17         471  
7              
8 17     17   415 use OPM::Maker -command;
  17         30  
  17         91  
9              
10 17     17   30665 use OPM::Maker::Utils qw(check_args_sopm);
  17         35  
  17         2633  
11              
12             sub abstract {
13 1     1 1 2947 return "Check if DatabaseInstall and DatabaseUninstall sections in the .sopm are correct";
14             }
15              
16             sub usage_desc {
17 1     1 1 1183 return "opmbuild dbtest ";
18             }
19              
20             sub validate_args {
21 8     8 1 7452 my ($self, $opt, $args) = @_;
22              
23 8         26 my $sopm = check_args_sopm( $args );
24              
25 8 100       41 $self->usage_error( 'need path to .sopm' ) if
26             !$sopm;
27             }
28              
29             sub execute {
30 1     1 1 1121 my ($self, $opt, $args) = @_;
31              
32 1         8 die "not implemented yet";
33             }
34              
35             1;
36              
37             __END__