--- trunk/Makefile.PL 2006/05/10 14:08:15 458 +++ trunk/Makefile.PL 2006/05/14 19:45:45 498 @@ -29,6 +29,8 @@ 'Biblio::Isis' => 0.13, 'MARC::Fast' => 0.02, 'Search::Estraier' => 0.06, + 'List::Util' => 0, + 'Spreadsheet::ParseExcel', => 0, }, dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', }, clean => { FILES => 'WebPAC-* pod2html Makefile tags' }, @@ -38,6 +40,7 @@ return <<'MAKE_MORE'; HTML_DIR=pod2html +profile_perl=./run.pl html: $(TO_INST_PM) test -e $(HTML_DIR) || mkdir $(HTML_DIR) @@ -65,5 +68,11 @@ rm -f log ./run.pl +profile: + perl -d:DProf $(profile_perl) --limit 500 && dprofpp > profile.`perl -e 'my @p = glob("profile.[0-9]*"); print scalar @p + 1'` + +profile2: + perl -d:SmallProf $(profile_perl) --limit 100 && sort -k 2nr,2 smallprof.out | vi -R - + MAKE_MORE }