WackoWiki: YuriKennisman/ПроглатываютсяПустотыМеждуКодами ...

Однострочные операторы

Т.к. в операторе if () {} фигурные скобки обязательны, но есть его постфиксный аналог, велик соблазн писать короткие операторы вроде
if ($i > 10) { $i = 10; }
в таком виде:
$i = 10 if $i > 10;

Делать так крайне не рекомендуется. Это ухудшает общую читабельность программы, затрудняет её пошаговую отладку, затрудняет понимание причин невыполнения оператора. Исключение составляют flow control операторы. Их надо писать в одну строчку, окружая условие скобками:
next if (...); return if (...); last if (...); die if (...);

Ни в коем случае не пишите так:
next if ($i > 10); # schizo: действие ПРЕДшествует ПРЕДусловию
и уж тем более так:
if ($i > 10) { $i = 10; } # momentary lapse of reason

В качестве «краткого вида записи условных операторов» допустимы также следующие конструкции:
$i > 10 or die "i is less than ten";

Фактически, «и»/»или» используются здесь в качестве if'ов. Поэтому для того, чтобы подчеркнуть отличие от «и»/»или» в if (), используем в таких конструкциях or и and (и НЕ используем || и &&). В условиях под if (), наоборот, используем || и && (и НЕ используем or и and):
# Так не надо: $i > 10 || die "i is less than (or equal to) ten"; # please do not if ($a == 10 and $c == 11) { # так тоже не надо }

Другое

Сложные регулярные выражения пишем на нескольких строках, при необходимости вставляем комментарии. Пример — см. в cookbook.
SQL-ные запросы стараемся писать структурированно:
$dbh->do(" update T set a=1, b=2 where c=3 ");

Если для обхода хэша не важен порядок, не используйте foreach (keys(%h)) — она создаёт временный массив и при болшом хэше съест много памяти.
Используйте конструкцию:
while (($key, $value) = each(%hash)) { ... }

foreach можно использовать только для того, чтобы обойти хэш в определённой последовательности:
foreach my $k (sort(keys(%hash))) { ... }