BEGIN {
    use vars qw($PATH_TO_CGI);
    $PATH_TO_CGI = 'e:\apacheweb\8084_develop.perl-community.de\html\perl-bin';
    $ENV{PATH_TO_CGI} = 'e:\apacheweb\8084_develop.perl-community.de\html\perl-bin';
}
use lib "$PATH_TO_CGI";