#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;

our $config;

do '/tmp/config.pl';

print Dumper(\$config),"\n";