use lib './';
use DBMgr;
sub MAIN(
Bool :$initdb = False,
Bool :$reload_all = False,
Bool :$reload_tables = False,
Bool :$reload_functions = False,
Bool :$backup = False,
Bool :$restore = False,
Str :$db_file = 'db.sql',
Bool :$static_sql = False,
Bool :$list_tables = False,
Bool :$list_indexes = False,
Bool :$list_functions = False,
Bool :$interactive = True){
say $initdb;
my $dbmgr = DBMgr.new;
say $dbmgr.preProcess();
}
use YAMLish;
class DBMgr{
has Bool $.preProcess is rw = False;
has Str $!config;
has Str $!config_file;
method new(Str $config_file = './dbconfig.yml'){
}
method dispatch(Str $action){
}
method backup(){
}
method restore(){
}
method listTables(){
}
method listFunctions(){
}
method listIndexes(){
}
method produceStaticSQL(){
}
method !config{
}
}