cat2.hs
main = getContents >>= putStr
[Sample Code Index]
[Support Site Top]