Select Code to Download

%main::GLOBAL = (
    dir1 = "/path/to/directory",
    dir2 = "/path/to/another",
);

sub read_config_files {
    $main::GLOBAL{newstuff} = "a string that was added";
    # etc
}

# this is file global.pl

...
    dir1 = "/path/to/directory",
    dir2 = "/path/to/another",
);

# this is file config.pl

...
        print "$k => $val\n";
    }
}

require GlobalStuff;