print $query->start_form('POST','./Signup.pl');
print $query->radio_group( -name =>'Parent',
                           -value =>["Father", "Mother"],
                           -default=>["NO DEFAULT"],
                           -linebreak=>'true',
                           -columnheader=>'Parent');


print "<TABLE BORDER='1' CELLSPACING='1' CELLPADDING='7'>";
print "<TR>";
print "<TH WIDTH='10%' VALIGN='TOP' BGCOLOR='#9933FF'>";
print "<FONT SIZE='2' COLOR='#FFFFFF'>Volunteer</TH>";
print "<TH WIDTH='10%' VALIGN='TOP' BGCOLOR='#9933FF' align='center'>";
print "<FONT SIZE='2' COLOR='#FFFFFF'>Day</TH>";
print "<TH WIDTH='10%' VALIGN='TOP' BGCOLOR='#9933FF' align='center'>";
print "<FONT SIZE='2' COLOR='#FFFFFF'>Date</TH>";
print "<TH WIDTH='10%' VALIGN='TOP' BGCOLOR='#9933FF' align='center'>";
print "<FONT SIZE='2' COLOR='#FFFFFF'>Number</TH>";
print "</TR>";
while (my @val = $sth->fetchrow_array ())
{
  print "<TR>";
  print "<TD WIDTH='10%' VALIGN='TOP' ALIGN='center'BGCOLOR='#99FF99' COLOR='#FFFFFF'>";
  print  $query->checkbox_group(-name=>'choice',
                               -values=>'');</TD>;
  #print "<A HREF=./Signup.pl?$val[2]&$val[3]></TD>";
  print "<TD WIDTH='10%' VALIGN='TOP' BGCOLOR='#99FF99' align='center'>";
  print "<FONT SIZE='2' COLOR='#9933FF'>$val[0]</TD>";
  print "<TD WIDTH='10%' VALIGN='TOP' BGCOLOR='#99FF99' align='center'>";
  print "<FONT SIZE='2' COLOR='#9933FF'>$val[1]</TD>";
  print "<TD WIDTH='10%' VALIGN='TOP' BGCOLOR='#99FF99' align='center'>";
  print "<FONT SIZE='2' COLOR='#9933FF'>$val[2]</TD>";
  print "</TR>";
}
print "</TABLE>";
print "<p>";

print $query->submit(-name=>'rows',
                     -value=>'Submit');
print " ";
print $query->reset;
print $query->end_form();