--- trunk/Makefile.PL 2006/01/28 14:58:30 392 +++ trunk/Makefile.PL 2006/05/14 21:18:26 499 @@ -28,6 +28,9 @@ 'File::Path' => 0, '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' }, @@ -37,6 +40,7 @@ return <<'MAKE_MORE'; HTML_DIR=pod2html +profile_perl=./run.pl html: $(TO_INST_PM) test -e $(HTML_DIR) || mkdir $(HTML_DIR) @@ -55,6 +59,7 @@ config_yml: test ! -e conf/config.yml && ln -s /data/Webpacus/config.yml conf/ || true + perl -c conf/normalize/*.pl run: config_yml rm -f log @@ -64,5 +69,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 }