#!/usr/bin/perl
###############################################################
# Classified Ads ABS-6.01                                     #
# Author: Bogdan P-o.                                         #
# Created 08/09/99                                            #
# Available at http://www.ads-programming.com/ad601.html      #
# Copyright 1999-2000 Ads-Programming.Com All Rights Reserved.#
###############################################################

# Set short name of category (not more 8 characters)
# Short name must be the same as name of this .cgi file
# e.g. file name is health.cgi, short name is health
$catname="lovebird";

#  Set up description of ad fields structure:
%deffld=(
          '1' => ['Location','loc','keyword','1','select',
          '<option>Alabama<option>Alaska<option>Arizona<option>Arkansas<option>California<option>Colorado<option>Connecticut<option>Delaware<option>D.C.<option>Florida<option>Georgia<option>Hawaii<option>Idaho<option>Illinois<option>Indiana<option>Iowa<option>Kansas<option>Kentucky<option>Louisiana<option>Maine<option>Maryland<option>Massachusetts<option>Michigan<option>Minnesota<option>Mississippi<option>Missouri<option>Montana<option>Nebraska<option>Nevada<option>New Hampshire<option>New Jersey<option>New Mexico<option>New York<option>North Carolina<option>North Dakota<option>Ohio<option>Oklahoma<option>Oregon<option>Pennsylvania<option>Puerto Rico<option>Rhode Island<option>South Carolina<option>South Dakota<option>Tennessee<option>Texas<option>Utah<option>Vermont<option>Virginia<option>Washington<option>West Virginia<option>Wisconsin<option>Wyoming'],
          
        );

# Set up header and footer text for this category:
$headtxt= <<HTMLF;
<table width="100%" bgcolor="#dddddd">
<tr><td>
<center>
<B>
<font FACE="ARIAL, HELVETICA" COLOR="#000099"><font size=+3>
General Classified Ads
</font></font></b>
</td></tr><tr><td>
<font FACE="ARIAL, HELVETICA" COLOR="#000077" size=-1>
<center><B>ABS-6.01 - Classified Ads (Professional Edition, Demo Version) </B></CENTER>
</font>
</td></tr></table>
HTMLF

$foottxt= " ";

# Set up html header and footer for the second ad pages 
#  (with datailed info and photos)
$sphead=" second page header";
$spfoot=" second page footer";


##############################################################
#  Names of perl libraries for Classified Ads

# Set up libriary for specifying html layout of Classified Ads pages
require "a601_lovebird.pl";
##############################################################
require "a601_cfg.pl";
require "a601_usr.pl";

&startsub;