my $x = do { "string" }; #### my $x; { $x = "string" }