#!/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");

##</code><code>##

#!/usr/bin/perl -w
#Volunteer.pl - Insert Volunteers into database.

use strict;
use DBI;
use CGI qw(:standard);
my $query = CGI::new();
my ($dbh, $sth, $count);
my $name  = $query->param("name");
my $date  = $query->param("date");
my $number= $query->param("number");
my $parent= $query->param("parent");
my $user= $query->param("user");