Skip Menu |

This queue is for tickets about the List-MoreUtils CPAN distribution.

Report information
The Basics
Id: 78198
Status: rejected
Priority: 0/
Queue: List-MoreUtils

Owner: Nobody in particular
Requestors: NKH [...]

Bug Information
Severity: Wishlist
Broken in: (no value)
Fixed in: (no value)

Subject: reimplementation of sub after
Download (untitled) / with headers
text/plain 369b
sub after (&@) { my $test = shift; my $started; my $lag; grep $started ||= do { my $x = $lag; $lag = $test->(); $x }, @_; } could be replaced by sub after (&@) { my $test = shift; my $started; grep $started || do { my $previous = $started; $started++ if $test->(); $previous }, @_; }
Download (untitled) / with headers
text/plain 173b
I'm not convinced - reusing outer variables seems to be a bad idea at all. Why it is an improvement to write after as shown and why does it introduce no regression? Cheers

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to