--- loncom/startup.pl 2000/02/22 21:32:17 1.1 +++ loncom/startup.pl 2001/10/02 18:50:07 1.3 @@ -1,7 +1,35 @@ #!/usr/bin/perl -use Apache(); -use lib '/home/httpd/lib/perl'; -use Apache::Constants(); -use CGI qw(-compile :all); +BEGIN { + use Apache(); + use lib '/home/httpd/lib/perl'; +} + +use Apache::Constants qw(:common :http :methods); +use CGI::Cookie(); +use CGI qw(:standard); +use HTTP::Headers(); + +#use Apache::File(); +#use Crypt::DES(); +#use DBI(); +#use Fcntl qw(:flock); +#use File::Copy(); +#use GDBM_File(); +#use HTML::TokeParser(); +#use HTML::TreeBuilder(); +#use IO::Socket(); +#use LWP::UserAgent(); +#use Math::Cephes qw(:trigs :hypers :bessels erf erfc); +#use Math::Random qw(:all); +#use Opcode(); +#use POSIX qw(strftime); +#use Safe(); +#use Safe::Hole(); +#use Apache::lonnet(); +#use Apache::lonxml(); +#use Apache::lonrep(); +#use Apache::lonuserstate(); +#use Apache::lonacc(); + 1;