#!/usr/local/bin/perl ## W.K. Ziemer, 2001 ## ## This file is buildProblemSet.pl ## It provides command line functionality to problem set building ## with webwork 1.7 ## ## syntax: buildProblemSet.pl courseID setDefinition ## example: buildProblemSet.pl ma112 set1.def use lib '/var/www/webwork/system/cgi/cgi-scripts'; use webworkInit; use Global; use Auth; use TimeLocal; use strict; if(@ARGV==2){ &Global::getCourseEnvironment("$ARGV[0]"); my $scriptDirectory = getWebworkScriptDirectory; require "${scriptDirectory}$Global::DBglue_pl"; require "${scriptDirectory}$Global::FILE_pl"; require "${scriptDirectory}$Global::HTMLglue_pl"; require "${scriptDirectory}$Global::buildProbSetTools"; my $method ='createNewPSVNs'; my $outputFormat='all_students'; my $message = &buildProbSetDB($ARGV[0],$ARGV[1],$method,'',$outputFormat); print "$message\n"; }else{ print " syntax: buildProblemSet.pl courseID setDefinition\n example: buildProblemSet.pl ma112 set1.def\n "; exit(0); };