#!/usr/bin/perl 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;