!/usr/bin/perl

# access config data directly from the My::Config class

use My::Config;
use strict;

my $config = My::Config->new();

print $config->base_directory , "\n";

$config->base_directory("/home/otheruser/");

print $config->base_directory() , "\n";