#!/usr/bin/runhugs module Main(main) where import System(getArgs) main :: IO () main = do input <- getContents putStr input