Something

Index: perl-module.eclass
===================================================================
RCS file: /var/cvsroot/gentoo-x86/eclass/perl-module.eclass,v
retrieving revision 1.108
diff -p -w -b -B -u -r1.108 perl-module.eclass
--- perl-module.eclass	20 Aug 2007 08:21:58 -0000	1.108
+++ perl-module.eclass	17 Oct 2007 07:40:28 -0000
@@ -301,3 +301,8 @@ updatepod() {
 		done
 	fi
 }
+
+if [ -z "${HOMEPAGE}" -a -z "${SRC_URI}" -a -n "${MODULE_AUTHOR}" ]; then
+	HOMEPAGE="http://search.cpan.org/~${MODULE_AUTHOR}/"
+	SRC_URI="mirror://cpan/authors/id/${MODULE_AUTHOR:0:1}/${MODULE_AUTHOR:0:2}/${MODULE_AUTHOR}/${P}.tar.gz"
+fi