use vars qw/ %OPT $DBH /; #### our %OPT;