This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
In buildtoc, eliminate @modpods by building %Found directly.
authorNicholas Clark <nick@ccl4.org>
Sun, 18 Dec 2011 16:56:45 +0000 (17:56 +0100)
committerNicholas Clark <nick@ccl4.org>
Mon, 19 Dec 2011 12:55:20 +0000 (13:55 +0100)
commitd71a9bd1fa374f9824b18f331ad39c48e25c15fd
tree81d69657421e7ebb367034de2c05bac3fe777db4
parent45ea9a6e0d15cab8408cc6c9c7292e8efd67db77
In buildtoc, eliminate @modpods by building %Found directly.

There's no need to use an intermediate array to store the results from
calling File::Find::find() as its only use is to build a hash of work to do,
by looping over it once.

Standardise on !! for the regex delimiter, and convert ^ and $ to \A and \z.
The temporary variable $pod can be eliminated, because it doesn't matter
whether $_ ends '.pod' or '.pm' in the code that follows.
pod/buildtoc