#!/usr/bin/env perl

use strict;
use warnings;

use SpaceCowboy::Database::Module;

my $database_credentials = { ... };

my $sdm = SpaceCowboy::Database::Module::->new($database_credentials);

$sdm->$_() for qw{primary first second third};