sub _generate{
my ($self, $htc, $lang, $env, $ct, $id) = @_;
debug $env => "language is '$lang', contest is '$ct' and id is '$id'";
sub _generate{
my ($self, $htc, $lang, $env, $ct, $id) = @_;
debug $env => "language is '$lang', contest is '$ct' and id is '$id'";