use MyProject::Dbh; my $dbh = MyProject::Dbh->instance->dbh; sub method1 { $dbh->do("... query goes here ..."); } sub method2 { my $sth = $dbh->prepare("... another query ..."); $sth->prepare; #... } } 1;