ネタですが、実話です。
- use Module; 宣言を書く時、全部ABC順にしないとイライラする。
- s///とかをs{}{}って書くとエスケープいらないのに、s/\\\/\\\/\\\\/g s/\\\/\\\//\\\\/gとか見るとイライラする。（追記：なんか一個抜けてた）
- qw// をqw()と書き直さずにはいられない。
- for(my $i = 0; $i < 10; $i++) とかを見ると for my $i (0..9)に書き直さずにはいされない
- 他人からもらったファイルを開ける前はとりあえず perl -i -pe 's/\r\n/\n/g'
- if ( ... ) elsif (...) elsif (... ) else ... みたいなのを見るととりあえずディスパッチテーブルを書きたくなる
- if ($foo eq 'XXX' || $foo eq 'YYY')を if ($foo =~ /^(XXX|YYY)$/) に書き直したくなる（追記：ベンチ取ったけど、比較する対象の数が６個になると正規表現のほうがはやかった。４個まではeqのほうが速い）
- 配列かハッシュを宣言する時に最後の要素でも必ずカンマを入れないと気が済まない
なんかもっとありそうだな。
僕と一緒に書いてる方達、別にこれをやらないと僕が怒るわけじゃないです。
トラックバック(0)
このブログ記事に対するトラックバックURL: http://mt.endeworks.jp/cgi-bin/mt-tb.cgi/2067
コメント(3)
コメントする
筆者
sub hoge()
{
my $a = shift;
my $b = shift;
}
my($a,$b) = @_;
と書け！とか。
> /^(XXX|YYY)$/
本当に神経質なら/^(?:XXX|YYY)$/ですね。
あるある（笑）追加で、
・perlcritic -1 foo.pl が通らないと気が済まない