--- trunk/Makefile.PL	2005/12/20 00:03:04	307
+++ trunk/Makefile.PL	2006/05/14 19:45:16	495
@@ -12,7 +12,7 @@
 	'Test::More' => 0,
 	'YAML' => 0,
 	'File::Slurp' => 0,
-	'Log::Log4perl' => 0,
+	'Log::Log4perl' => 1.02,
 	'Data::Dumper' => 0,
 	'Cwd' => 0,
 	'Text::Iconv' => 0,
@@ -23,11 +23,13 @@
 	'Time::HiRes' => 0,
 	'File::Temp' => 0,
 	'List::Util' => 0,
-	'URI::Escape' => 0,
+	'Encode' => 0,
 	'LWP' => 0,
 	'File::Path' => 0,
 	'Biblio::Isis' => 0.13,
 	'MARC::Fast' => 0.02,
+	'Search::Estraier' => 0.06,
+	'List::Util' => 0,
     },
     dist                => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
     clean               => { FILES => 'WebPAC-* pod2html Makefile tags' },
@@ -37,6 +39,7 @@
 	return <<'MAKE_MORE';
 
 HTML_DIR=pod2html
+profile_perl=./run.pl
 
 html: $(TO_INST_PM)
 	test -e $(HTML_DIR) || mkdir $(HTML_DIR)
@@ -57,10 +60,18 @@
 	test ! -e conf/config.yml && ln -s /data/Webpacus/config.yml conf/ || true
 
 run: config_yml
+	rm -f log
 	./run.pl --clean --limit 100
 
 full: config_yml
+	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
 }