#config.pl use strict; eval 'use constant SOMETHING => "asdf"' unless(defined(\&SOMETHING)); 1; #test.pl use strict; use File::Basename; my $dir = dirname($ENV{"SCRIPT_FILENAME"})."/"; require("${dir}config.pl"); print &SOMETHING;