#!/bin/env perl
###################################
#
# Put this course and its students/faculty into the database.
#
# $Id: configure 254 2005-02-28 17:48:44Z mahoney $
#################################
use warnings;
use strict;
use cs::Database;
use cs::Utilities qw(populateCourse);

my $semester   = 'Spring 2005';
my $coursename = 'Programming Workshop';
my @faculty  = qw( mahoney );
my @students = qw( glein eschraff benjamin gavin sheller );

populateCourse( semester   => $semester,
		coursename => $coursename,
		faculty    => \@faculty,
		students   => \@students,
	      );