our @EXPORT_OK  = qw($dbh $sth);
our ($dbh, $sth); # declare vars to be EXPORT_OKed