I have written some CGI applications that start
with this code:
BEGIN {
my $homedir = ( getpwuid($>) )[7];
my @user_include;
foreach my $path (@INC) {
if ( -d $homedir . '/perl' . $path ) {
push @user_include, $homedir . '/perl' . $path;
}
}
unshift @INC, @user_include;
}
I have failed to document exactly what this section
is doing and would like to correct that. Am I correct
when I say that this code includes all the directories
where Perl is located (C:/Perl in my case) in @INC, so
there is little chance of not finding a module I have
installed and am calling in this CGI script?
Mike Flannigan
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
