#!/usr/bin/perl

use strict;
use File::UserConfig;
#use File::ShareDir ':ALL';
use File::Read;

my $username =  getlogin();
print "user: $username\n";
#my $configdir = File::UserConfig->configdir;
my $configdir = File::UserConfig->new(
        dist     => 'Map-Energy',
        dirname  => '.map_energy',
        module   => 'Map::Energy',
)->configdir;


#my $dir = dist_dir('map_energy');
#my $config_file = dist_file(  'map_energy',  'config/data.txt');
#my $db_file = dist_file(  'map_energy',  'db/mapdata.db');
#my $mapsettings = read_file({ as_root => 1, skip_comments => 1, skip_blanks => 1 }, $config_file);
#print "map settings: $mapsettings\n";

exit;