or download this
$ perl -e'use strict; my $x = "foo"; \${ $x }'
Can't use string ("foo") as a SCALAR ref while "strict refs" in use at
+ -e line 1.
$ perl -e'use strict; \${ "foo" }'
Can't use string ("foo") as a SCALAR ref while "strict refs" in use at
+ -e line 1.