[CrackMonkey] Beaujolais to Lisp!
Paul Cameron
1paul at optushome.com.au
Wed Jul 18 03:22:22 PDT 2001
On Tue, Jul 17, 2001 at 10:25:18PM -0700, Mr. Bad wrote:
> >>>>> "PC" == Paul Cameron <1paul at optushome.com.au> writes:
>
> Me> It's actually a pretty fun proof.
>
> PC> Yes. perlfaq5.
>
> PC> Blah a vous.
>
> Well, wait a sec:
>
> ---8<---
> How do I select a random line from a file?
>
> Here's an algorithm from the Camel Book:
>
> srand;
> rand($.) < 1 && ($line = $_) while <>;
>
> This has a significant advantage in space over reading the
> whole file in. A simple proof by induction is available
> upon request if you doubt the algorithm's correctness.
> ---8<---
>
> It actually doesn't have the proof in it.
No, you have to ask Tom Christiansen for it.
Paul.
More information about the Crackmonkey
mailing list