}
if (@$missing) {
- print $fh "=head1 Undocumented functions\n\n";
+ print $fh "\n=head1 Undocumented functions\n\n";
print $fh "These functions are currently undocumented:\n\n=over\n\n";
for my $missing (sort @$missing) {
print $fh "=item $missing\nX<$missing>\n\n";
=head1 SEE ALSO
-perlguts(1), perlxs(1), perlxstut(1), perlintern(1)
+L<perlguts>, L<perlxs>, L<perlxstut>, L<perlintern>
_EOE_
=head1 SEE ALSO
-perlguts(1), perlapi(1)
+L<perlguts>, L<perlapi>
END