Unix tools/yes

From HaskellWiki
Jump to: navigation, search


A simple utility to repeatedly print "y" to standard output.

Here are some various ways this small program can be written:

main = let y = putStrLn "y" >> y in y
main = putStrLn $ concat $ repeat "y\n"
main = let y = 'y' : '\n' : y in putStrLn y
main = putStrLn "y" >> main
main = putStrLn $ cycle "y\n"