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.16';
3             # ABSTRACT: Test db definitions in .sopm files
4              
5 17     17   13044 use strict;
  17         44  
  17         549  
6 17     17   97 use warnings;
  17         48  
  17         573  
7              
8 17     17   505 use OPM::Maker -command;
  17         36  
  17         122  
9              
10 17     17   38692 use OPM::Maker::Utils qw(check_args_sopm);
  17         44  
  17         3298  
11              
12             sub abstract {
13 1     1 1 3640 return "Check if DatabaseInstall and DatabaseUninstall sections in the .sopm are correct";
14             }
15              
16             sub usage_desc {
17 1     1 1 1779 return "opmbuild dbtest ";
18             }
19              
20             sub validate_args {
21 8     8 1 12381 my ($self, $opt, $args) = @_;
22              
23 8         35 my $sopm = check_args_sopm( $args );
24              
25 8 100       75 $self->usage_error( 'need path to .sopm' ) if
26             !$sopm;
27             }
28              
29             sub execute {
30 1     1 1 749 my ($self, $opt, $args) = @_;
31              
32 1         11 die "not implemented yet";
33             }
34              
35             1;
36              
37             __END__