--- loncom/startup.pl	2001/10/02 18:50:07	1.3
+++ loncom/startup.pl	2001/10/03 13:35:34	1.4
@@ -1,35 +1,38 @@
 #!/usr/bin/perl
 
-BEGIN {
-  use Apache();
-  use lib '/home/httpd/lib/perl';
-}
-
+use Apache();
+use lib '/home/httpd/lib/perl';
+#use lib '/usr/lib/perl5/site_perl/5.005/';
+#use lib '/usr/lib/perl5/site_perl/5.005/i386-linux/';
 use Apache::Constants qw(:common :http :methods);
 use CGI::Cookie();
-use CGI qw(:standard);
+use CGI qw(-compile :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();
-
+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::lonhomework();
+use Apache::lonrep();
+use Apache::lonuserstate();
+use Apache::lonacc();
+use Apache::lonparmset();
+use Apache::lonauth();
+use Apache::caparesponse();
+use Apache::lonstatistics();
+use Apache::lonchart();
 1;