perldebguts
perlxstut
perlxs
+ perlclib
perlguts
perlcall
perlutil
perldbmfilter
perlapi
perlintern
+ perliol
perlapio
perltodo
perlhack
perlhist
perldelta
+ perl572delta
+ perl571delta
+ perl570delta
perl56delta
perl5005delta
perl5004delta
perlaix
perlamiga
+ perlbs2000
perlcygwin
+ perldgux
perldos
+ perlepoc
perlhpux
perlmachten
+ perlmacos
+ perlmpeix
perlos2
perlos390
- perlposix-bc
+ perlsolaris
+ perltru64
+ perlvmesa
perlvms
+ perlvos
perlwin32
);
@ARCHPODS = qw(
perlaix
perlamiga
+ perlbs2000
perlcygwin
+ perldgux
perldos
+ perlepoc
perlhpux
perlmachten
+ perlmacos
+ perlmpeix
perlos2
perlos390
- perlposix-bc
+ perlsolaris
+ perltru64
+ perlvmesa
perlvms
+ perlvos
perlwin32
);
for (@ARCHPODS) { s/$/.pod/ }
Here should be listed all the extra programs' documentation, but they
don't all have manual pages yet:
- =over
+ =over 4
=item a2p
}
if (s/^=head1 (.*)/=item $1/) {
unhead2();
- output "=over\n\n" unless $inhead1;
+ output "=over 4\n\n" unless $inhead1;
$inhead1 = 1;
output $_; nl(); next;
}
if (s/^=head2 (.*)/=item $1/) {
unitem();
- output "=over\n\n" unless $inhead2;
+ output "=over 4\n\n" unless $inhead2;
$inhead2 = 1;
output $_; nl(); next;
}
s/\s+$//;
next if /^[\d.]+$/;
next if $pod eq 'perlmodlib' && /^ftp:/;
- ##print "=over\n\n" unless $initem;
+ ##print "=over 4\n\n" unless $initem;
output ", " if $initem;
$initem = 1;
s/\.$//;