open (MANIFEST, "../MANIFEST") or die $!;
@files = grep m#(?:\.pm|\.pod|_pm\.PL)#, map {s/\s.*//s; $_}
- grep {m#^lib# || m#^ext#} grep !m#/(?:t|demo)/#, <MANIFEST>;
+ grep { m#^(lib|ext|dist|cpan)/# && !m#/(?:t|demo)/# } <MANIFEST>;
my %exceptions = (
'abbrev' => 'Text::Abbrev',
Always use B<-w>.
-Follow the guidelines in the perlstyle(1) manual.
+Follow the guidelines in L<perlstyle>.
Always use B<-w>.
=back
-=back
-
=head2 Guidelines for Converting Perl 4 Library Scripts into Modules
=over 4
=back
+=back
+
=head1 NOTE
Perl does not enforce private and public parts of its modules as you may