{ my $x; { local $x = 1 } }; Can't localize lexical variable $x at (eval 2) line 1, <> line 3.