What does this mean?
Can't locate object method "selectcol_arraryref" via package "DBI::db" (perhaps you forgot to load "DBI::db"?) at Signup.pl line 64. Debugged program terminated. Use q to quit or R to restart, use O inhibit_exit to avoid stopping after program termination,
Here is the code it is failing on

foreach $date ( @volunteer_date ) {


        my $sql = "select distinct Volunteer from Volunteer where Volu
+nteer =? and Date =?";
        my $sth = $dbh->selectcol_arraryref( $sql, undef );
        execute($name, $date);
        $chk = $sth->[0];

#Verify the parent is not signed up.
    if ($chk eq $name){
        print $query->h1({-align=>'center'}, "You are already signed u
+p for this date: $date");
        } #end if statement

#process the information and update the schedule.
   else{
   my $sql = "select max(Number) from Volunteer where Date =? and Volu
+nteer =?";
   my $number = $dbh->selectcol_arrayfef($sql, $date, "TBD");

   my $id = "Date = '$date' and Volunteer = 'TBD' and Number = $number
+";
   my $content = "Volunteer";
   my $status = "$name";
   my $sth=$dbh->do(qq {'UPDATE Volunteer SET content=?,status=? WHERE
+ id=?'});
   my $rv=$sth->
   execute($content, $status, $id);
[download]