#----------------------------------------------------------------------------\
# Global Variables and modules
#----------------------------------------------------------------------------\
  $AUTH_METHOD = "LDAP";  # possible values: (FTP|POP|LDAP)
  if ($AUTH_METHOD = "POP") { use Mail::POP3Client; }
  if ($AUTH_METHOD = "FTP") { use Net::FTP; }
  if ($AUTH_METHOD = "LDAP") { use Net::LDAP; 
		       	       use Net::LDAP::Util qw(ldap_error_text
                    				      ldap_error_name
                    				      ldap_error_desc
                  	        	       	     ); 
			     }
  $LDAPSERVER = "123.123.123.123";
  $LDAP_BASE = "o=base_o";
  $POPSERVER = "pop.pop.com";
  $FTPSERVER = "ftp.ftp.com";
  $GFX = "/gfx";
  $ADMINPATH = "/cgi-bin/admin";
  $LEASESPATH = "/var/db";
  $DHCPDCONFPATH = "/etc/dhcpd/dhcpd.conf";
  $ERROR_LOG = "/var/www/logs/register_error.log";
  $ALLOW_DOMAIN = "123.123.123.*";
  $IP = $ENV{'REMOTE_ADDR'};
#----------------------------------------------------------------------------/

#----------------------------------------------------------------------------\
# Print out the header HTML
#----------------------------------------------------------------------------\
  sub print_custom_header {
    printf "content-type: text/html\n\n";
    printf "<html><head><META HTTP-EQUIV=\"EXPIRES\" CONTENT=\"0\">";
    printf "<title>Online Network Registration</title>";
    printf "</head> <body TEXT=\#000000 BGCOLOR=\#FFFFFF LINK=\#705F56";
    printf "VLINK=\#4B4B4B BACKGROUND=/gfx/background.jpg>";
    printf "<table BORDER=0 CELLSPACING=0 CELLPADDING=0 halign=left><tr>";
    printf "<td ALIGN=LEFT VALIGN=TOP WIDTH=185><center><img src=/gfx/spacer.gif>";
    printf "</center><P> </td> <td ALIGN=LEFT VALIGN=TOP WIDTH=414>";
    printf "<center><img SRC=/gfx/newits1.gif>";
    printf "<p>";
  }
#----------------------------------------------------------------------------/

#----------------------------------------------------------------------------\
# Print out the footer HTML
#----------------------------------------------------------------------------\
  sub print_custom_footer {
    printf "<P></center></td></tr><tr><td>&nbsp;</td></tr><tr><td></td>";
    printf "<td ALIGN=CENTER>";
    printf "<img SRC=/gfx/copyright.gif ALT=\"Copyright 1999-2000 Southwestern";
    printf "University\"></td></tr>";
    printf "</table></body></html>";
  }
#----------------------------------------------------------------------------/

