If you want to loop through all the keys of a hash, I think you want:

for (keys %modules) {
   if (/cgi/i) { print "Found one $_\n" }
}
[download]