in reply to Finding a random line

perldoc -q "How do I select a random line from a file?"