in reply to strangeness with prototypes and 'logical defined or'?

also this works (my 0.002 cents):
perl -ce "sub foo (&) {} foo (sub {;}) // 7"

[download]
There are no rules, there are no thumbs..
Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.

In Section Seekers of Perl Wisdom