Async exception handling in F#

gistfile1.fs

open System
open System.Net

// exception handling in async using Async.Catch
let fetchAsync (name, url:string) =
    async {
        let uri = new System.Uri(url)
        let webClient = new WebClient()
        let! html = Async.Catch (webClient.AsyncDownloadString(uri))
        match html with
        | Choice1Of2 html -> printfn "Read %d characters for %s" html.Length name
        | Choice2Of2 error -> printfn "Error! %s" error.Message
    } |> Async.Start

// exception handling in async using regular try/with
let fetchAsync2 (name, url:string) =
    async {
        let uri = new System.Uri(url)
        let webClient = new WebClient()
        try
            let! html = webClient.AsyncDownloadString(uri)
            printfn "Read %d characters for %s" html.Length name
        with error -> printfn "Error! %s" error.Message
    } |> Async.Start

fetchAsync2 ("blah", "http://asdlkajsdlj.com")