# Product Index

package product_index;
require Exporter;

our @ISA = qw( Exporter );
our @EXPORT = qw( get_index );

# PRINTS THE INDEX PAGE
sub get_index{

    my $self = shift;

    my $title = "Index ";
    my $body =<<EOFBODY;

<tr>

<!-- MAIN WINDOW -->      
<td class="bottomLeft" align="center" valign="top" >
	<SCRIPT language="JavaScript" src='http://GrillsByDesign.com/_scripts/productsBar.js'></SCRIPT>
</td>
<td class="bottomRight"align="center" valign="top">
<br>
        <table width="550" align="center" border="0">
          <tr> 
            <td><table width="450" align="left">
                <tr> 
                  <td align="center"><h1>
		<font color="#FFFFFF" size="6">Products By Catagory</font>
	  </h1></td>
          </tr>
         </table>
         <table width="100" border="0" align="right" >
           <tr> 
             <td align="right"><a onClick="window.open('', 'GBD_Help',
         		'toolbar=no,scrollbars=yes,resizable=yes,width=450,height=600')" 
		href="help.htm" target=GBD_Help><font color="white" size="2">
	<strong>LEARN MORE:<br>Products </strong> </font></a> 
	</td>
                </tr>
              </table></td>
          </tr>
        </table>
        <hr>
        <br>
        <table width="500" border="0">
          <tr>
            <td align="left" valign="top"> 
              <p><font color="#FFFFFF" size="5"><u><a href="/products/grills/index.htm">Grills</a></u></font></p>
              <p><font size="4">Ahh, the grill... </font></p>
              <p><font size="4">Nothing beats the sound of its sizzle in the summer 
                season.</font></p>
              <p><font size="4">Check out our grill section to find the perfect 
                match for your backyard.</font></p>
              <p>&nbsp;</p>
              </td>
            <td align="center" valign="middle"><a href="/products/grills/index.htm">
	<img src="http://grillsbydesign.com/_graphics/_pics/raised216x1621059.jpg" width="216" height="162" border="0">
	</a>
            </td>
          </tr>
          <tr>
            <td align="center" valign="middle"><a href="accessories/accessDoors/index.htm">
	<img src="http://grillsbydesign.com/_graphics/_pics/raised216x1621141.jpg" width="216" height="162" border="0">
	</a></td>
            <td align="left" valign="top"><p><font color="#FFFFFF" size="5"><u>
	<a href="accessories/accessDoors/index.htm">Accessories</a></u></font></p>
              <p><font size="4">Custom Design is our specialty at Grills By Design.</font></p>
              <p><font size="4">Browse these catagories to find out more about 
                how you can personalize your GBD Custom Grill Station.</font></p>
              <p>&nbsp;</p>
              </td>
          </tr>
          <tr>
            <td align="left" valign="top"><p><u><font color="#FFFFFF" size="5">
	<a href="/products/islandPaks/index.htm">Island 
                Packages</a></font><font size="5"><br>
                <br>
                </font></u><font size="4">Grills By Design is thrilled to announce 
                the launch of our new Island Pak division</font></p>
              <p><font size="4">Prefabricated, portable and ready to ship anywhere 
                in the U.S.A.</font></p>
              <p>&nbsp;</p></td>
            <td align="center" valign="middle"><a href="/products/islandPaks/index.htm">
	<img src="http://grillsbydesign.com/_graphics/_pics/raised216x162islandPak1.jpg" width="216" height="162" border="0">
	</a></td>
          </tr>
        </table>
        <h1>&nbsp;</h1>
        <table width="500" border="0">
          <tr> 
            <td><p><font size="5">Fruition Of Perfection<br>
                </font><font size="7">-Grills By Design</font></p>
              </td>
          </tr>
        </table>
        <p>&nbsp;</p>
        <p>&nbsp;</p>
        </td>     

</tr>

EOFBODY
 
    $self->setTitle( $title );
    $self->setHead( $head );
    $self->setScript( $script );
    $self->setBody( $body );
}
