Wrong var.

perl -Mstrict -we 'eval q(x=3) or die "err $@"'
[download]

Outputs:

err Can't modify constant item in scalar assignment at (eval 1) line 1
+, at EOF
Bareword "x" not allowed while "strict subs" in use at (eval 1) line 1
+.
[download]