I am very new to perl programming and need a lot of help.
I am going to tell you what I want to accomplish and you tell me what would be the best way to do it. I will try not to be long winded.
I manage my sons Hockey team web site. We need for people to volunteer for a fundraiser every weekend in the summer. I want the parents to sign up (only the parents) so I want to give them a login and password. this will be verified by with the Password table. The login will be their players name and they will identify themselves as either the Father or mother (no other choices). From that information I will query the roster table and get the parents name. The parents name will be saved so that when they get to the volunteer page all they have to do is select the available date and the Parents name will be inserted into the Volunteer table and that parent will be responsible for that date. What I am trying to do is create that login page. The information needed is the names of the players in a list he is my code to create the scrolling list.
#Volunteer.pl - Sign up sheet for Volunteers
use strict;
use DBI;
use CGI qw(:standard);
my ($dbh, $sth, $count, $query);
my @val= ();
my $data= ();
my @date=();
$dbh = DBI->connect ("DBI:mysql:host=localhost;database=<database name
+>",
"mnlight","<password>",
{PrintError=> 0, RaiseError=> 1});
$sth = $dbh->prepare ("select Player from Roster order by Player");
$sth->execute ();
while (my @player = $sth->fetchrow_array ())
{
print $query->header('MNLIGHTNING Login Form');
print $query->start_html(-title => 'Password');
print $query->start_multipart_form('POST','/cgi-bin/Password.pl'),
print $query->scrolling_list(
-name =>'Player',
-value =>\@player,
-size =>'20');
Edit Masem 2001-12-20 - CODE tags instead of BR's