perl
perlfaq
perltoc
+ perlbook
perlsyn
perldata
perlrun
perldiag
perllexwarn
+ perldebtut
perldebug
perlvar
perlopentut
perlretut
- perlref
perlre
+ perlref
+
perlform
- perllocale
- perlunicode
+
+ perlboot
+ perltoot
+ perltootc
+ perlobj
+ perlbot
+ perltie
perlipc
perlfork
perlthrtut
perlport
- perlsec
+ perllocale
+ perlunicode
+ perlebcdic
- perlboot
- perltoot
- perltootc
- perlobj
- perlbot
- perltie
+ perlsec
perlmod
perlmodlib
perlmachten
perlos2
perlos390
+ perlposix-bc
perlvms
perlwin32
);
perlmachten
perlos2
perlos390
+ perlposix-bc
perlvms
perlwin32
);
open(PERLPOD, "perl.pod") || die "$0: opening perl.pod failed: $!\n";
while (<PERLPOD>) {
if (/^For ease of access, /../^\(If you're intending /) {
- if (/^\s+(perl\w*)\s+\w/) {
+ if (/^\s+(perl\S*)\s+\w/) {
push @PERLPODS, "$1.pod";
}
}
!NO!SUBS!
+close OUT or die "Can't close $file: $!";
+chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
+exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
+chdir $origdir;