One of the consequences of the strict pragma is that you have either to predeclare your variables (which in your case would be done using my @words = qw(baloney has a first name)) or to use explicit package names, like @main::words = qw(baloney has a first name) (which is not recommended, except in some cases)...

acid06
perl -e "print pack('h*', 16369646), scalar reverse $="