关闭

F# 处理命令行参数

488人阅读 评论(0) 收藏 举报
F# 处理命令行参数

#light
open System;;

type env(svr1 : string, pot1 : string) =
    member x.Svr1 = svr1
    member x.Pot1 = pot1

let doSomething (e:env)=
    Console.WriteLine (String.Format("{0}:{1}", e.Svr1, e.Pot1))

[<EntryPoint>]
let Main  args =
    //printfn "Hello %A" args
    let e= (
        match args with
        | [|"test"|] -> new env("Server1","1000")
        | _ -> new env("Server2","2000")
    )
    //printfn "Hello %A" e.Svr1
    doSomething e |> ignore
    0

=====================

> Main [|"test"|];;
Server1:1000
val it : int = 0


> Main [|"aaaa"|];;
Server2:2000
val it : int = 0

 

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:890277次
    • 积分:19451
    • 等级:
    • 排名:第456名
    • 原创:40篇
    • 转载:40篇
    • 译文:40篇
    • 评论:42条
    最新评论