print while <$quux>;