Another person followed up with a 9 line equivalent Perl code.
I wonder what an equivalent Ruby program would look like?
I do not care whether it 15 or 25 lines. Python program is not very readable.
Can Ruby variant be concise, yet more clear?
--Leo--
Seriously, these golf competitions don't do much for me. Show me
formatted code that applies some interesting algorithms instead.
That's how you spar with other languages!
ruby -rwebrick -e 'WEBrick::HTTPServer.new(:DocumentRoot=>".").start'
but it is a oneliner in python too ;)
> Seriously, these golf competitions don't do much for me. Show me
> formatted code that applies some interesting algorithms instead.
> That's how you spar with other languages!
def qs(l)
return [] if (x,*xs=*l).empty?
less, more = xs.partition{|y| y < x}
qs(less) + [x] + qs(more)
end
algoritm suggestions are welcome :)
> algoritm suggestions are welcome :)
How about
def qs(l)
l.sort!
end
;-),
nikolai
--
::: name: Nikolai Weibull :: aliases: pcp / lone-star / aka :::
::: born: Chicago, IL USA :: loc atm: Gothenburg, Sweden :::
::: page: www.pcppopper.org :: fun atm: gf,lps,ruby,lisp,war3 :::
main(){printf(&linux["\021%six\012\0"],(linux)["have"]+"fun"-97);}
> slashdot published an article on someone's
> 15 lines long Peer-2-Peer application
> http://developers.slashdot.org/article.pl?sid=04/12/15/1953227
>
> Another person followed up with a 9 line equivalent Perl code.
>
> I wonder what an equivalent Ruby program would look like?
I did this 9.5 hours ago. Compared to the python one it is not
vulnerable to File stealing attacks (a client can request a file
../foobar and ~/foobar from the python server and will get it back
AFAIK) and 6 lines long. It is however vulnerable to the DRb style
.instance_eval exploits. I will fix this shortly, but I might have to
use 7 lines then.
> * gabriele renzi <rff...@remove-yahoo.it> [Dec 16, 2004 10:30]:
> > def qs(l)
> > return [] if (x,*xs=*l).empty?
> > less, more = xs.partition{|y| y < x}
> > qs(less) + [x] + qs(more)
> > end
>
> > algoritm suggestions are welcome :)
>
> How about
>
> def qs(l)
> l.sort!
> end
>
> ;-),
> nikolai
>
I hope sort is not implemented as quicksort ;)
Regards,
Brian
--
Brian Schröder
http://www.brian-schroeder.de/
> > def qs(l)
> > l.sort!
> > end
> I hope sort is not implemented as quicksort ;)
array.c:
static VALUE
sort_internal(ary)
VALUE ary;
{
qsort(RARRAY(ary)->ptr, RARRAY(ary)->len, sizeof(VALUE),
rb_block_given_p()?sort_1:sort_2);
return ary;
}
rb_ary_sort_bang(ary)
VALUE ary;
{
rb_ary_modify(ary);
if (RARRAY(ary)->len > 1) {
FL_SET(ary, ARY_TMPLOCK); /* prohibit modification during sort */
rb_ensure(sort_internal, ary, sort_unlock, ary);
}
return ary;
}
Just hope your systems qsort() is any good,
N> Just hope your systems qsort() is any good,
uln% grep qsort util.h
void ruby_qsort _((void*, const int, const int, int (*)(), void*));
#define qsort(b,n,s,c,d) ruby_qsort(b,n,s,c,d)
uln%
Guy Decoux
> uln% grep qsort util.h void ruby_qsort _((void*, const int, const int,
> int (*)(), void*)); #define qsort(b,n,s,c,d) ruby_qsort(b,n,s,c,d)
Then hope Ruby's implementation of qsort is any good ;-),
> * ts <dec...@moulon.inra.fr> [Dec 16, 2004 14:30]:
> > > Just hope your systems qsort() is any good,
>
> > uln% grep qsort util.h void ruby_qsort _((void*, const int, const int,
> > int (*)(), void*)); #define qsort(b,n,s,c,d) ruby_qsort(b,n,s,c,d)
>
> Then hope Ruby's implementation of qsort is any good ;-),
> nikolai
>
So just out of interest, what kind of sort is ruby using?
(I could dig the sources, but I hope it will be an easy question for someone to
answer without spending too much time.)
>Hi Everybody,
>slashdot published an article on someone's
>15 lines long Peer-2-Peer application
>http://developers.slashdot.org/article.pl?sid=04/12/15/1953227
>
I am saddened that they failed to mention ducks. Ducks, or, more
particularly, images of ducks, are the only legitimate payload in
peer-to-peer networks these days. And, notice how I summarized this
point in less than 15 lines of text. Christmas miracles abound, folks.
_why
Seems to be your standard memory-swap optimized quicksort, using its own
stack (i.e. no recursion), much like the one in glibc,
Nice use of drb.
I wonder how long the same program would be in ruby if it implemented
the "tinyp2p" protocol instead of using drb. ;)
-dave
--
work: d...@lcs.mit.edu me: d...@pobox.com
MIT Laboratory for Computer Science http://www.angio.net/
No matter how much you might be off topic, I always enjoy reading your
posts. Another miracle lurking in the dark, there.
yours,
kaspar
> Here we go. Thanks to Mauricio Fernández for helping out with cutting
> off a few important characters!
Another new version, binary files can be transfered to and from Win32,
you can run servers from behind Routers and you can list all the files
on the specified network sorted by node and file name before downloading
them. Still six lines.