### Python import random if a := int(random.random() * 2): print(f'true [{a}]') else: print(f'false [{a}]')
### Perl use strict; use warnings; if (my $a = int(rand(2))) { print "true [$a]\n"; } else { print "false [$a]\n"; } # 右辺によっては「代入と比較を間違ってませんか」的な warning が出る if (my $a = 1) { print "true [$a]\n"; } else { print "false [$a]\n"; }