Tanktalus asked above about if (all(@x) eq any(@y) {...}. I can see how useful that would be, but would have to experiment to find a way to implement it without getting as big as Q::S, while not making the code too ugly.
Actualy it is not all the difficult. Realy once you have overloaded the operators perl manages most of the extra magic to make that work without bloating your code. The code i linked to before is under 60 lines and handles that as well as embeding different any() and all() objects inside each other. For instance it handles print "YEA" if all( any(1..5), any(1..10), any(1..20)) > all(2..4); as expected.
/me is still dieing to see how you approached the problem.
In reply to Re^2: RFC: Junction.pm
by eric256
in thread RFC: Junction.pm
by fireartist
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |