Pure Perl Configuration File

app.conf

{
        database => 'donut',
        user     => 'homer',
        password => 'simpson',

        quote => {
                give => 'me',
                the  => 'number',
                for  => 911,
        },
}

app.pl

#!/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 not defined $config or ref $config ne 'HASH';

print Dumper $config;