-q =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
// =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
/o =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
PerlIO =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
Unicode =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
__DATA__ =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
cgi =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
fat comma =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
foreach =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
heredoc =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
learn perlbot =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
manual =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
objects =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perl regex =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perl5004delta =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perl5005delta =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perl561delta =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perl56delta =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perl570delta =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlaix =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlamiga =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlapi =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlapio =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlapollo =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlbeos =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlbook =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlboot =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlbs2000 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlcall =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlce =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlcheat =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlcn =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlcompile =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlcygwin =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldata =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldbmfilter =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldebguts =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldebtut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldebug =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldelta =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldgux =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldiag =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldos =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perldsc =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlebcdic =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlembed =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlepoc =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq1 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq2 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq3 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq4 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq5 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq6 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq7 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq8 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfaq9 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfilter =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfork =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfreebsd =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlfunc =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlguts =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlhack =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlhist =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlhpux =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlhurd =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlintern =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlintro =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perliol =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlipc =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlirix =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perljp =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlko =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perllexwarn =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perllocale =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perllol =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlmachten =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlmacos =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlmint =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlmod =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlmodinstall =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlmodlib =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlmodstyle =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlmpeix =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlnetware =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlnewmod =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlnumber =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlobj =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlop =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlopentut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlos2 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlos390 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlothrtut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlpacktut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlplan9 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlpod =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlpodspec =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlqnx =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlre =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlref =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlreftut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlrequick =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlretut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlrun =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlsec =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlsolaris =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlstyle =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlsub =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlsyn =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlthrtut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perltie =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perltoc =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perltodo =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perltooc =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perltoot =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perltrap =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perltru64 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perltw =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlunicode =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlunifaq =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perluniintro =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlunitut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlutil =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perluts =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlvar =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlvmesa =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlvms =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlvos =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlwin32 =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlxs =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
perlxstut =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
pod =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
posix =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
quotes =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
setuid =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
sprintf =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
strict =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g
use warnings =~ s{https?://perldoc\.perl\.org/([^/]+).html}{https://perldoc.pl/$1}g