F# 处理命令行参数

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

 

阅读更多
版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/hadstj/article/details/7387552
文章标签: f# server string
个人分类: F# 函数编程
上一篇用 OData Service 访问 U.S. Consumer Price Index
下一篇F# 3.0 好像不怎么支持汉字
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

关闭
关闭