ich würde das ganze mal komplett überarbeiten, das sieht mir ziemlich chaotisch aus, wie auch schon erwähnt wurde. benennung sollte immer sein: $dbh = datenbankhandle, $sth = statementhandle. du kannst theoretisch auch andere namen verwenden, aber ein statementhandle $dbh zu nennen, ist dann schon eher vorsätzlich verwirrend.

du übergibst den subroutinen variablen, aber das ist teilweise eher dekoration. stattdessen benutzt du in den subs dann globale variablen. sowas will man nicht und bringt einen nur ärger ein, glaub mir.