my($dbh, $sth);

##</code><code>##

perldoc strict