#!/pkg/gnu/bin//perl5 # #$Id$ # push(@INC, "$wd/bin"); require('WebStone-common.pl'); require('flush.pl'); # force flush after every write or print $| = 1; html_begin("In Progress"); print CLIENT "
"; show_model(); &flush(CLIENT); &flush(STDOUT); &start_runbench(); print CLIENT <WebStone Completed