#!/usr/bin/perl use strict; use warnings; use Mojo::File qw(curfile); use lib curfile()->dirname()->sibling('lib')->to_string; use AccountManager::App; my $app = AccountManager::App->new( moniker => 'AccessCheck', ); $app->start();