package SomeCode; use strict; use warnings; use KB::Stats::DBConnect; my $dbh = KB::Stats::DBConnect->dbh; $dbh->do( ... );