#!/usr/bin/env perl

use strict;
use warnings;
use Data::Dumper;
use Safe;

my $config = Safe->new->rdo( 'app.conf' );
die "Couldn't parse config file: $@" if $@;
die 'Invalid config file' if ! defined $config || ref $config ne 'HASH';

print Dumper $config;