p4raw-id: //depot/perl@10151
$_ = $1 if /#.*pod\s*=\s*(\S+)/;
my ($where, $what) = m|^(.*?)/(\S+)|;
runpod2man($where, $opts{man1dir}, $opts{man1ext}, $what);
- if (($where, $what) = m|#.*link\s*=\s*(\S+)/(\S+)| {
+ if (($where, $what) = m|#.*link\s*=\s*(\S+)/(\S+)|) {
runpod2man($where, $opts{man1dir}, $opts{man1ext}, $what);
}
}
pod/podchecker
pod/podselect
utils/c2ph # link = utils/pstruct
-utils/dproffpp
+utils/dprofpp
utils/h2ph
utils/h2xs
utils/perlbug
utils/pl2pm
utils/splain
x2p/a2p # pod = x2p/a2p.pod
-x2p/findperl
+x2p/find2perl
x2p/s2p # link = x2p/psed