#!/usr/bin/perl -w use strict; use vars qw($data); require "load_configfile_data.pl"; print $data;