You might take a look at a module of mine,
Devel::Profiler. I use
%main:: as a jumping-off point to scan all the symbol tables in the system looking for subroutines to profile. I won't claim the code is simple but at least it's better commented than Exporter.pm!
-sam