{- imports as before -}
    
main = do
  args <- getArgs
  let acts = map output args
  sequence_ acts

{- definitions of output, countLinesFile, and hCountLines as before -}