--- db/prgsrc/eq/Attic/dbchgk.pm 2001/05/18 01:37:51 1.1 +++ db/prgsrc/eq/Attic/dbchgk.pm 2001/05/18 02:10:15 1.2 @@ -1,7 +1,7 @@ package dbchgk; use DBI; use Exporter; -use VARS qw(@ISA @EXPORT); +use vars qw(@ISA @EXPORT); @ISA=qw(Exporter); @EXPORT = qw(&getbase &closebase &getrow $z &in2out &getall &out2in &mydo