MASTER_SITE_PERL_CPAN+=	\

	ftp://ftp.cpan.org/pub/CPAN/modules/by-module/%SUBDIR%/ \

# Regulate the mode of obtain. By default using modules/by-module symlink and if 

	http://www.cpan.dk/modules/by-module/%SUBDIR%/ \

# new method using authors/id/ in action.

	${MASTER_SITE_RINGSERVER:S,%SUBDIR%,lang/perl/CPAN/modules/by-module/&,} \

_PERL_CPAN_SORT?= modules/by-module

	ftp://ftp.kddlabs.co.jp/lang/perl/CPAN/modules/by-module/%SUBDIR%/ \

	http://ftp.jaist.ac.jp/pub/CPAN/modules/by-module/%SUBDIR%/ \

# Please add URI to MASTER_SITE_PERL_CPAN_BY instead of this one.

	ftp://ftp.dti.ad.jp/pub/lang/CPAN/modules/by-module/%SUBDIR%/ \

MASTER_SITE_PERL_CPAN?=

	ftp://ftp.sunet.se/pub/lang/perl/CPAN/modules/by-module/%SUBDIR%/ \

	ftp://mirror.hiwaay.net/CPAN/modules/by-module/%SUBDIR%/ \

# Actual list of MASTER SITES for CPAN

	ftp://ftp.mirrorservice.org/sites/ftp.funet.fi/pub/languages/perl/CPAN/modules/by-module/%SUBDIR%/ \

MASTER_SITE_PERL_CPAN_BY+= \

	http://at.cpan.org/modules/by-module/%SUBDIR%/ \

	ftp://ftp.cpan.org/pub/CPAN/%CPANSORT%/%SUBDIR%/ \

	ftp://ftp.auckland.ac.nz/pub/perl/CPAN/modules/by-module/%SUBDIR%/ \

	http://www.cpan.dk/%CPANSORT%/%SUBDIR%/ \

	http://backpan.cpan.org/modules/by-module/%SUBDIR%/ \

	ftp://ftp.kddlabs.co.jp/lang/perl/CPAN/%CPANSORT%/%SUBDIR%/ \

	ftp://ftp.funet.fi/pub/languages/perl/CPAN/modules/by-module/%SUBDIR%/ \

	http://ftp.jaist.ac.jp/pub/CPAN/%CPANSORT%/%SUBDIR%/ \

	http://cpan.nctu.edu.tw/modules/by-module/%SUBDIR%/

	ftp://ftp.dti.ad.jp/pub/lang/CPAN/%CPANSORT%/%SUBDIR%/ \

	ftp://ftp.sunet.se/pub/lang/perl/CPAN/%CPANSORT%/%SUBDIR%/ \

	http://ring.nict.go.jp/archives/CPAN/%CPANSORT%/%SUBDIR%/ \

	ftp://mirror.hiwaay.net/CPAN/%CPANSORT%/%SUBDIR%/ \

	ftp://ftp.mirrorservice.org/sites/ftp.funet.fi/pub/languages/perl/CPAN/%CPANSORT%/%SUBDIR%/ \

	http://at.cpan.org/%CPANSORT%/%SUBDIR%/ \

	http://ring.riken.jp/archives/CPAN/%CPANSORT%/%SUBDIR%/ \

	ftp://ftp.auckland.ac.nz/pub/perl/CPAN/%CPANSORT%/%SUBDIR%/ \

	http://backpan.cpan.org/%CPANSORT%/%SUBDIR%/ \

	ftp://ftp.funet.fi/pub/languages/perl/CPAN/%CPANSORT%/%SUBDIR%/ \

	http://cpan.nctu.edu.tw/%CPANSORT%/%SUBDIR%/

# Contain CPAN keyword otherwise empty

_PERL_CPAN_FLAG = ${MASTER_SITE_SUBDIR:C/(CPAN):.*$/\1/}

# Convert author ID into L2 cache hierarchy.

# For example FLORA -> F/FL/FLORA, GRUBER -> G/GR/GRUBER

_PERL_CPAN_ID = ${MASTER_SITE_SUBDIR:C/^CPAN:(.)(.)(.*)$/\1\/\1\2\/\1\2\3/}

# If found CPAN keyword inside MASTER_SITE_SUBDIR must use new logic.

# Also with new logic where no need in %SUBDIR%

.if !empty(_PERL_CPAN_ID) && ${_PERL_CPAN_FLAG:L} == "cpan"

    _PERL_CPAN_SORT= authors/id/${_PERL_CPAN_ID}

    MASTER_SITE_PERL_CPAN=${MASTER_SITE_PERL_CPAN_BY:S/%CPANSORT%/${_PERL_CPAN_SORT}/:S/%SUBDIR%//}

.else

    MASTER_SITE_PERL_CPAN=${MASTER_SITE_PERL_CPAN_BY:S/%CPANSORT%/${_PERL_CPAN_SORT}/}

.endif

MASTER_SITE_SUBDIR=	../../authors/id/D/DD/DDUMONT

MASTER_SITE_SUBDIR=	CPAN:DDUMONT

MASTER_SITE_SUBDIR=	../by-authors/id/R/RK/RKRIMEN

MASTER_SITE_SUBDIR=	CPAN:RKRIMEN