如何在Haskell中实现一个简单的命令行应用程序

在Haskell中实现一个简单的命令行应用程序可以使用Haskell的I/O操作和函数式编程的特性。以下是一个实现的示例代码，其中包括了使用例子：

import System.Environment

-- 定义主函数
main :: IO ()
main = do
    -- 从命令行参数获取用户输入
    args <- getArgs
    -- 根据用户输入调用不同的功能函数
    case args of
        ["hello"] -> hello
        ["add", x, y] -> add (read x) (read y)
        _ -> putStrLn "Invalid command"

-- 功能函数1：打印Hello World
hello :: IO ()
hello = putStrLn "Hello, World!"

-- 功能函数2：求两个数的和
add :: Int -> Int -> IO ()
add x y = putStrLn $ "Sum: " ++ show (x + y)

这个简单的命令行应用程序有两个功能函数，分别是打印"Hello, World!"和计算两个数的和。应用程序根据用户输入的命令行参数调用不同的功能函数。下面是几个使用这个应用程序的例子：

例子1：执行haskell-app hello，输出Hello, World!

例子2：执行haskell-app add 5 3，输出Sum: 8

例子3：执行haskell-app invalid-command，输出Invalid command

以上就是一个简单的在Haskell中实现命令行应用程序的例子，你可以根据自己的需要修改和扩展功能函数和相应的命令行参数处理逻辑。