my $a = 1;
my $b = 2;
$a && $b = 3;