In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/bace499647c542e44fa169173393f19316fe05b6?hp=23e51b95a8db32227346e84c1c77148c98aba157>
- Log ----------------------------------------------------------------- commit bace499647c542e44fa169173393f19316fe05b6 Author: Rafael Garcia-Suarez <[email protected]> Date: Tue Jun 16 12:21:04 2015 +0200 Perl example style nit in docs for sort() Declare both arrays, no need to clear them. ----------------------------------------------------------------------- Summary of changes: pod/perlfunc.pod | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index ba77638..b2c8bb6 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -6824,7 +6824,7 @@ Examples: # same thing, but much more efficiently; # we'll build auxiliary indices instead # for speed - my @nums = @caps = (); + my (@nums, @caps); for (@old) { push @nums, ( /=(\d+)/ ? $1 : undef ); push @caps, fc($_); -- Perl5 Master Repository
