#!/usr/bin/perl -w
#Volunteer.pl - Sign up sheet for Volunteers

use strict;
use DBI;
use CGI qw('standard');
use CGI::Pretty;
use CGI::Cookie;

my $query = CGI::Pretty->new;

#my $query = CGI::new;
my ($dbh, $sth,$cookie,$sess_id);
my @val= ();
$cookie=$query->cookie(-name=>'user',
-value=>$sess_id,
-path=>'cgi-bin/Signup.pl',
-expires=>'+3h');

print header(-cookie=>$cookie), start_html ("Volunteer SignUp Form");