Skip Menu |

This queue is for tickets about the CPS CPAN distribution.

Report information
The Basics
Id: 55787
Status: resolved
Priority: 0/
Queue: CPS

People
Owner: Nobody in particular
Requestors: leonerd-cpan [...] leonerd.org.uk
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.09
Fixed in: 0.10



Subject: kwhile() leaks @_ through klast
$ perl -MCPS=kwhile -E'kwhile( sub { my ( $knext, $klast ) = @_; @_ = 1 .. 3; goto &$klast }, sub { say "\@_ is ", @_ } )' @_ is 123 Should print @_ is -- Paul Evans
Fixed in bzr repo. Will be in next CPAN version -- Paul Evans
Fixed in 0.10; on CPAN -- Paul Evans