foreach (@mods) { eval { $premem = ?; require "$mod.pm"; import "$mod.pm"; $postmem = ?; Symbol::delete_package($mod); #saw in faq ;) print "Mod: $mod, used: ", $postmem-$premem, "\n"; } }