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