#!/usr/bin/perl
use strict;
#use lib 'C:\Inetpub\wwwroot\Sites\asp\techdex\projects\forums\cgi-bin\forums\.';
use lib '.';
use MyBoard;

&do_header("$btitle");
print qq(<h3>Password Recovery System</h3>
<p>Please enter the email address associated with your account in the box below and then click "Search."</p>

<form action="recover2.cgi" method="POST">
<table border="0" cellpadding="0" cellspacing="0" align="left"><tr>
<td><b>Email Address:</b>&nbsp;</td><td>
<input type="text" name="email" size="25"></td>
<td><input type="Submit" value="Search"></td>
</tr></table>
</form>
);

&do_footer;