use Mojo::Home;

my $home = Mojo::Home->new;
print $home;