db/prgsrc/mkRS.pl - diff

Return to mkRS.pl CVS log

Up to [Local Repository] / db / prgsrc

version 1.3, 2001/10/31 04:38:03	version 1.6, 2005/07/05 20:24:17
Line 32 cicles_number=1.	Line 32 cicles_number=1.

=cut	=cut


use locale;	use locale;
use DBI;	use DBI;
use POSIX qw (locale_h);	use POSIX qw (locale_h);
Line 39 use lib "../lib";	Line 40 use lib "../lib";
use chgkfiles;	use chgkfiles;
use dbchgk;	use dbchgk;
my $minstop=2000;	my $minstop=2000;
open (STDERR,">errors");
do "../bin/common.pl";	my $DUMPDIR = $ENV{DUMPDIR} \|\| "../dump";
do "../bin/chgk.cnf";
	open (STDERR,">$DUMPDIR/errors");
	do "common.pl";
	do "chgk.cnf";


die "Undefined \$maxwsize! check your chgk.cnf" unless $maxwsize;	die "Undefined \$maxwsize! check your chgk.cnf" unless $maxwsize;

Line 59 print "Creating word2question table...\n	Line 64 print "Creating word2question table...\n
KEY idkey (id),	KEY idkey (id),
word INT UNSIGNED NOT NULL,	word INT UNSIGNED NOT NULL,
KEY wordkey (word),	KEY wordkey (word),
questions MEDIUMBLOB	questions MEDIUMBLOB,
	INDEX(word)
)"	)"
)	)