**** script.pl **** #!/usr/bin/perl use warnings; use strict; use vars qw(@fields); require "conf.pl"; print $fields[0]; **** conf.pl **** @fields = qw( FOO BAR BAZ );