#!/bin/env perl ################################### # # Put this course and its students/faculty into the database. # # $Id: configure 119 2005-02-02 00:19:09Z mahoney $ ################################# use warnings; use strict; use cs::Database; use cs::Utilities qw(populateCourse); my $semester = 'Spring 2005'; my $coursename = 'Algorithms'; my @faculty = qw( mahoney ); my @students = qw( dgg jberry glein jolande ); populateCourse( semester => $semester, coursename => $coursename, faculty => \@faculty, students => \@students, );