rand($.) < 1 && ($line = $_) while <>