1 package Gruntmaster
::App
;
6 our $VERSION = '5999.000_004';
8 use App
::Cmd
::Setup
'-app';
11 sub allow_any_unambiguous_abbrev
() { 1 }
12 sub default_command
{ 'commands' } # Show usage when called without arguments
15 (['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']]}])
22 sub table
{ shift->global_options->{table
} }
24 dbinit
$ENV{GRUNTMASTER_DSN
} // 'dbi:Pg:';
33 Gruntmaster::App - command-line interface to the Gruntmaster 6000 database