File Coverage

blib/lib/Gruntmaster/App.pm
Criterion Covered Total %
statement 11 16 68.7
branch n/a
condition 0 2 0.0
subroutine 4 8 50.0
pod 3 4 75.0
total 18 30 60.0


line stmt bran cond sub pod time code
1             package Gruntmaster::App;
2              
3 1     1   20249 use 5.014000;
  1         4  
4 1     1   5 use warnings;
  1         2  
  1         41  
5              
6             our $VERSION = '5999.000_015';
7              
8 1     1   849 use App::Cmd::Setup '-app';
  1         57036  
  1         7  
9 1     1   844 use Gruntmaster::Data;
  1         4  
  1         259  
10              
11             sub allow_any_unambiguous_abbrev () { 1 }
12 0     0 1   sub default_command { 'commands' } # Show usage when called without arguments
13              
14             sub global_opt_spec {
15 0     0 1   (['table' => 'hidden', {one_of => [
16             ['contests|ct|c' => 'Act on contests'],
17             ['jobs|j' => 'Act on jobs'],
18             ['problems|pb|p' => 'Act on problems'],
19             ['users|us|u' => 'Act on users']]}])
20             }
21              
22 0     0 0   sub table { shift->global_options->{table} }
23              
24             sub run {
25 0   0 0 1   dbinit $ENV{GRUNTMASTER_DSN} // 'dbi:Pg:';
26 0           shift->SUPER::run(@_);
27             }
28              
29             1;
30             __END__