require '/tmp/b';
print $x;  # 3
# assuming /tmp/b has   $x=3;   in it

##</code><code>##

use strict;
use warnings;
use AppConfig;
my $config = AppConfig->new({
            GLOBAL => {
                    DEFAULT  => "<undef>",
                    ARGCOUNT => AppConfig::ARGCOUNT_ONE,
                }
        }, "var1", "var2");
$config->file(\*DATA);
print $config->var1() , "\n";
print $config->var2() , "\n";
__DATA__
var1 = x
var2 = y