On Tue, Jul 16, 2002 at 07:44:41AM -0700, Rick Klement wrote:
> Yep, I make it 25 strokes also.
> 
> 25 -p $h{$_}=""}for(sort%h){
> 
> Mind if I play through?
> 
> 22 @h{<>}="";print sort%h

I'm not entirely sure why this works, but here's a 21:

21 print sort@h{<>}=0,%h

-- Mike

-- 
Michael W. Thelen
eval unpack 
u,'M*"1C/2<P,BDN-"`U+C`A(RLG*3U^>2\A+48O82UZ+SME=F%L*"1C+B(G=2HGM+"<Z,D<U4SU<(B%!.T9=5#HF-5(H)2%%/$907$`Z)B5#.E8U4BM@2&`G+EPD$+R(I.P``'

Reply via email to