Perl日記

日々の知ったことのメモなどです。Perlは最近やってないです。

評価の+は何個つけてもよい

適当にやってたら動いてびっくりしたのでメモ。
よくある評価用の+は無名ハッシュのあれである。

sub foo { +{ bar => 'baz' } }

この+は++にしない限り何個でも置ける。

sub foo { + + + + + +{ bar => 'baz' } }

ところで、数値の正負を逆にしたいときは「‐」を使うけれども、
これと+は組み合わせられる。

my $i = 10;
print +-+-+-+-+-$i++**$i++;
#=> 100000000000
print +-+-+-+-+-++$i**$i++;
#=> -743008370688

使い所ないなあ。