my $x = 10;
eval (sprintf '%s', 'my $y = $x');
say $y;  #line 14

--output:--
Global symbol "$y" requires explicit package name at 2perl.pl line 14.
Execution of 2perl.pl aborted due to compilation errors.