Since this is for the most part a personal preference there is no single correct answer, but my choice of formatting usually goes like this:
in reply to Re^2: Best practices and any way to have Perl Tidy clean it up
in thread Best practices and any way to have Perl Tidy clean it up
my Ssth = $dbh->prepare(q(
WHERE name = ?
AND money = ?
AND field = ?
$sth->execute($name, $money, $field);