I was in shock today. Complete and utter shock. I discovered that 11 modules in $workproject didn't use strict. So I knocked up a quick test script which uses File::Find::Rule to find all the .pm files and check that each one contains "use strict". Now it'll never happen again.
And always use strict, young abw... ;-)