about sitehisaichi5518がPerlを書いて、つついて、イチャイチャするブログ。最近はnode.jsもやってる。

hisaichi5518プロフィール/ twitter管理人twitter/ rss feedRSS feed

読みにくそうな例

1
2
3
4
5
6
7
8
9
10
11
12
use strict;
use warnings;

# 連発
my $hoge = 1;
chinko() if $hoge == 1;
unko() if $hoge == 2;

# 一行に収まってない
do {
    ...;
} if $hoge;

読みやすそうな例

1
2
3
4
5
6
use strict;
use warnings;

my $hoge = 1;
my $fuga = 1;
return $hoge if not defined $fuga;

returnあると読みやすそうだと思った。
return — if not defined —;は結構すきです。

結論

結局は好みだけど、使い方ミスったら読みにくいと俺は思う。

蛇足

あと一行に収まってない時は後ろに置かないようにした方が見やすいんじゃないかなーと思った。orとかandとかも。

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
use strict;
use warnings;

# ぎゅっと詰まってて読みにくそう。
my $chinko = $hisa->chinko(
    name => 'hisaichi5518 no musuko',
    size => 'small',
) or die 'no chinchin!';

# 読みやすそう。
my $chinko = $hisa->chinko(
    name => 'hisaichi5518 no musuko',
    size => 'small',
);
if (!$chinko) {
    die "no chinchin!";
}

と思ったけど、案外普通ですね。

2011年12月28日 水曜日 perl, 雑記

Leave a Reply