version 1.1, 2000/02/22 21:32:17
|
version 1.3, 2001/10/02 18:50:07
|
Line 1
|
Line 1
|
#!/usr/bin/perl |
#!/usr/bin/perl |
|
|
use Apache(); |
BEGIN { |
use lib '/home/httpd/lib/perl'; |
use Apache(); |
use Apache::Constants(); |
use lib '/home/httpd/lib/perl'; |
use CGI qw(-compile :all); |
} |
|
|
|
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; |
1; |