#!/usr/bin/env perl use strict; use warnings; use Data::Dumper; use Mojolicious::Commands; use BeastBB; # Start command line interface for application if (!scalar @ARGV || $ARGV[0] ne 'migrate') { @ARGV = qw/daemon/; Mojolicious::Commands->start_app('BeastBB'); exit; } my $beastbb = BeastBB->new(); print Data::Dumper::Dumper $beastbb->config;