use lib qw(.); use MyProject::Config; print "Content-type: text/plain\n\n"; print "Script B\n"; print "Inside project: ", MyProject::Config::project_name();