On Dec 7, Rick Klement said:

>Jeff 'japhy' Pinyan wrote:
>> 
>> On Dec 7, Rick Klement said:
>> 
>> >  sub{shift,pop while@_>2;print@_}->(<>)
>>    @_=<>;shift,pop while@_>2;print@_
>
>shift() and pop() only default to @_ in a sub{} ...
>(that's what I liked about it)

Oh, that's right.  That's why I didn't use that solution anyway.

-- 
Jeff "japhy" Pinyan      [EMAIL PROTECTED]      http://www.pobox.com/~japhy/
RPI Acacia brother #734   http://www.perlmonks.org/   http://www.cpan.org/
** Look for "Regular Expressions in Perl" published by Manning, in 2002 **
<stu> what does y/// stand for?  <tenderpuss> why, yansliterate of course.

Reply via email to