The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;

use Test::Most;
plan qw/no_plan/;

use Path::Class;
use Config::JFDI;
my $config;

$config = Config::JFDI->new(
    qw{ name path_to path t/assets },
);

is($config->get->{path_to}, dir('a-galaxy-far-far-away', 'tatooine'));

$config = Config::JFDI->new(
    qw{ name path_to path t/assets },
    path_to => 'a-long-time-ago',
);

is($config->get->{path_to}, dir('a-long-time-ago', 'tatooine'));