*scalar = \do { my $x = 1 };