to$h{shift@s}
. Don't get too complex, eh? UpdateTime's up!$h{$s[0]}
for a total of 70 chars.sub e {sub n{abs($s-$b)};$s=pop;while($b=pop){if(&n<$d||!$d){$l=$b;$d= +&n}}$l}
In reply to (boo) Re: Closest-value-in-list Golf!
by boo_radley
in thread Closest-value-in-list Golf!
by larryk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |