Re: General question about a haiku program

[telemachus]

Thanks all for the suggestions; thanks also to the Monks in Chatterbox who explained what the @$#! this line says:

rand($.) < 1 && ($haiku = $_) while <DATA>;

I was glad to learn that trick and also to think more about Tie::File.