(boo)Re: Re: Closest-value-in-list Golf -- or, a sorted affair.

sort{$a<=>$b}keys%h
[download]

is too much, since $a<=>$b is the default sort. that leaves you with

sub g {$n=pop;$h{abs($_-$n)}=$_ for@_;$h{(sort keys%h)[0]}}
[download]

for 52.

Comment on (boo)Re: Re: Closest-value-in-list Golf -- or, a sorted affair. Select or Download Code

Replies are listed 'Best First'.
Re: (boo)Re: Re: Closest-value-in-list Golf -- or, a sorted affair. by larryk (Friar) on May 29, 2001 at 18:47 UTC
did you test this? i think you'll find that `$a cmp $b` is the default. "Argument is futile - you will be ignorralated!"	[reply] [d/l]
Re: (boo)Re: Re: Closest-value-in-list Golf -- or, a sorted affair. by suaveant (Parson) on May 29, 2001 at 18:50 UTC
Test your code... that does not work... I tried it already... returns 20 - Ant	[reply]
Re: Re: (boo)Re: Re: Closest-value-in-list Golf -- or, a sorted affair. by boo_radley (Parson) on May 29, 2001 at 19:00 UTC
How strange. I was using a different data set when I tested this, and it returned the correct answer. Mea culpa.	[reply]
Re: Re: Re: (boo)Re: Re: Closest-value-in-list Golf -- or, a sorted affair. by suaveant (Parson) on May 29, 2001 at 19:10 UTC
Must be the decimals or something... I thought it would work, too - Ant	[reply]