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