使い捨てスクリプトじゃないプログラムをperlで組んでる方にお聞きしたいのですが、
どの程度コーディングスタイルを決めてますか？
ウチはいい加減だけど大体こんな感じです。

・サブルーチンの引数を取るときの作法
× my $引数1 = shift; my 引数2 = shift;
○ my($引数1, $引数2) = @_;
・引数は必ず ( と ) でくくる。ただし、 print だけは例外。
・@_や$_を省略できるケースでも省略しない。
・@_や$_は、よほど単純な処理でない限り、きちんと命名した変数に代入してから使用する。
・条件判定は必ず先に書く。
× &サブルーチン(...) if (条件);
○ (条件) && &サブルーチン(...);
・名前空間の汚染は可能な限り拒否。
× $x = encode_base64(...);
○ $x = MIME::Base64::encode_base64(...);