2011-07-20 顔に見える計算式 Perl use strict; use warnings; my $i = 0; # ||||||||||||| my $j = -- $i - $i --; # \ / print "$j\n"; 途中で心折れた。