Just out of curiosity...
if (all(5, 10, 15) > any (3, 8, 12, 20))
{ print "Success!\n" }
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(@input) =~ /^\d+$/) { print "Got all whole numbers!\n" }
looks much better than:
if (all(qr/^\d+$/, @input)) { ... }
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:
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"; }
I'm not sure why you need that object anyway.