in reply to Re: RFC: Junction.pm
in thread RFC: Junction.pm
if (all(5, 10, 15) > any (3, 8, 12, 20)) { print "Success!\n" }
Yes, it does work!
I should have tested before I answered: I realised that of course it would work, as the operators the module used are still overloaded, even when being used inside the module.
if (qr/^\d+$/ == all(@input)) { ... }
The above now works. Note that you need to use a regex object qr// rather than just //, and you also need to use '==' or '!=', not '=~' or '!~'. It isn't ideal, but then you only need to use it if you want to!
btw, I've uploaded this to CPAN as Perl6::Junction.
update: changed the above link, as the cpan indexer hasn't picked it up yet, when you search by module name.
|
|---|