Return to updateRS3.pl CVS log | Up to [Local Repository] / db / prgsrc |
version 1.3, 2002/12/08 01:04:22 | version 1.4, 2003/02/13 16:27:32 |
---|---|
Line 53 use POSIX qw (locale_h); | Line 53 use POSIX qw (locale_h); |
use lib "../lib"; | use lib "../lib"; |
use chgkfiles; | use chgkfiles; |
use dbchgk; | use dbchgk; |
open (STDERR,">errors"); | my $DUMPDIR = $ENV{DUMPDIR} || "../dump"; |
open (STDERR,">$DUMPDIR/errors"); | |
my $initime=time; | my $initime=time; |
open TIME, ">time"; | open TIME, ">$DUMPDIR/time"; |
do "common.pl"; | do "common.pl"; |
do "chgk.cnf"; | do "chgk.cnf"; |