[Milan-pm] Is this a feature or a bug?

[marcos rebelo]

the code:

use v5.10;
use Modern::Perl;
use List::MoreUtils qw(any);

say( (any { $_ eq 7 } (0..10) ) or 'false' );

given (5) {
    when (5) {
        say( (any { $_ eq 7 } (0..10) ) or 'false' );
        say( join(", ", map { $_ eq 7 } (0..10) ) );
    }
}


prints:

1
false
, , , , , , , 1, , ,



the second 'any' should have returned a true value or not, and why???


Best Regards
Marcos Rebelo

-- 
Marcos Rebelo
http://oleber.freehostia.com
Milan Perl Mongers leader http://milan.pm.org