in reply to The bug in DBI package

sub DB_xxx ...

my $dbh = DB_Connect

??