Re^3: Best practices and any way to have Perl Tidy clean it up

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:

my Ssth = $dbh->prepare(q(
                    SELECT *
                    FROM DATABASE
                    WHERE name  = ?
                      AND money = ?
                      AND field = ?
));

$sth->execute($name, $money, $field);
[download]

Comment on Re^3: Best practices and any way to have Perl Tidy clean it up Download Code