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

my $semester   = 'Spring 2005';
my $coursename = 'Statistics';
my @faculty  = qw( mahoney );
my @students = qw( silver bgodwin kjames mlewis rnash
		   tdr eschraff zarah jthrall twolfe tucker );

#
#  1 Silver Garrety                          silver
#  2 Brady Godwin                            bgodwin
#  3 Katherine (Casey) James                 kjames
#  4 Melanie (Mel) Lewis                     mlewis
#  5 Morgan Tucker			     tucker
#  6 Rebecca Nash                            rnash
#  7 Tyler Rutherford                        tdr
#  8 Elizabeth (Liz) Schraffenberger         eschraff
#  9 Zarah Thompson-Jacobs                   zarah
# 10 Jennifer (Jenny) Thrall                 jthrall
# 11 Troy Wolfe                              twolfe
#

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