package ModuleReport; END { print "$_\n" for (sort keys %INC); } 1;