Perl のコーディングスタイルに関して・パート2
今回は、Perl での 代入演算子 や 三項演算子 の記述方法について。
代入演算子
Perl では、長い式は代入演算子の前で折り返すとです。
02 | $equilibrium_potential_val |
03 | = ( ( $GAS_CONST * $TEMP ) / ( $z * $FARADAY_CONST) ) |
04 | * log( $ion_out_concentration / $ion_in_concentration ); |
07 | $equilibrium_potential_val = |
08 | ( ( $GAS_CONST * $TEMP ) / ( $z * $FARADAY_CONST) ) |
09 | * log( $ion_out_concentration / $ion_in_concentration ); |
12 | $equilibrium_potential_val = ( ( $GAS_CONST * $TEMP ) / ( $z * $FARADAY_CONST) ) |
13 | * log( $ion_out_concentration |
14 | / $ion_in_concentration ) |
18 | $equilibrium_potential_val = ( |
25 | $ion_out_concentration / $ion_in_concentration |
あっ、これは遵守できてなかった。私は、代入先変数の後ろに代入演算子を置きまくり。
三項演算子
Perl では、三項演算子は列で統一するとです。
一連の三項演算子
02 | my $mode = $query{mode} eq $EMPTY_STR ? 'user' |
03 | : $query{mode} =~ m/^admin-(.*) /xms ? "administrator_\1" |
04 | : $query{mode} =~ m/^pub-(.*) /xms ? "publisher_\1" |
05 | : defined $query{mode} ? "$query{mode}" |
10 | my $mode = $query{mode} eq $EMPTY_STR ? 'user' |
11 | : $query{mode} =~ m/^admin-(.*)/xms ? "administrator_\1" |
12 | : $query{mode} =~ m/^pub-(.*)/xms ? "publisher_\1" |
13 | : defined $query{mode} ? $query{mode} : 'user'; |
単一の三項演算子
2 | my $name = defined $query{name} ? $query{name} |
7 | my $name = defined $query{name} ? $query{name} : 'John Doe'; |
えっ、これ遵守するの、無理ゲーじゃない？
#####コメント#####
- 本日のツッコミ
- tako - 2010/05/17 (月) 12:06
- ムリダナ。＞＜
comment