use strict; my ($cgidir, $servername); use Config qw/$cgidir $servername/;