in reply to Re: for vs. while questionin thread for vs. while question
for (;$BASKET and (my @socks = $BASKET -> can_read(2)) or 1); ) { ... } [download]
Probably simpler just to use the while. {grin}
-- Randal L. Schwartz, Perl hacker