in reply to Re: Golf: Length of longest line in a filein thread Golf: Length of longest line in a file
liftM (foldl (\x y -> max x $ length y) 0 . lines) $hGetContents stdin