>>>>> "JB" == Jeff Boes <[EMAIL PROTECTED]> writes:
JB> while (my ($k,$v)= splice @_, -2) { $o->$k($v)}
JB> is a bug that should read
JB> while (@_ and my ($k,$v)= splice @_, -2) { $o->$k($v)}
JB> at least, under perl 5.6.1.
why do you say that? returning an empty list is a normal way of exiting
a loop. each in a list context does it and the boolean code expects to
look for it. there are times when you can't check the original list (it
could be an iterator like each) so the empty list is the out of band EOF
value.
uri
--
Uri Guttman --------- [EMAIL PROTECTED] ---------- http://www.sysarch.com
SYStems ARCHitecture and Stem Development ------ http://www.stemsystems.com
Learn Advanced Object Oriented Perl from Damian Conway - Boston, July 10-11
Class and Registration info: http://www.sysarch.com/perl/OOP_class.html
