Just out of curiosity...
Does that work? :-) Also, I'm not sure if you can override =~, but that makes much more sense in perl5 land than allowing a regex or something as a parameter, as long as you're going about all this syntactical sugar anyway:if (all(5, 10, 15) > any (3, 8, 12, 20)) { print "Success!\n" }
looks much better than:if (all(@input) =~ /^\d+$/) { print "Got all whole numbers!\n" }
Also, these don't make a lot of sense (to me, anyway) in OO format (and I'm an OO freak!). I'd expect more like:if (all(qr/^\d+$/, @input)) { ... }
I'm not sure why you need that object anyway.use Junction qw(any all); if (any(@list) > 0) { print "we have at least one postive number!\n"; +} if (all(@list) > 0) { print "even better - they're all positive number +s!\n"; }
In reply to Re: RFC: Junction.pm
by Tanktalus
in thread RFC: Junction.pm
by fireartist
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |