Select Code to Download

$ perl -e 'use strict; my $a = "abc"; $a->{"aaa"} = "a"'
Can't use string ("abc") as a HASH ref while "strict refs" in use at -
+e line 1.