print the assembly version attributes for each dll

PrintVersions.fsx

open System
open System.IO
open System.Reflection

Directory.GetFiles(".","*.dll",SearchOption.TopDirectoryOnly) |> Seq.iter (fun f ->
    printfn "%s" f
    let a = Assembly.LoadFrom f

    match a.GetCustomAttribute<AssemblyVersionAttribute>() with
    | null -> ()
    | v -> printfn "  Version: %s" v.Version

    match a.GetCustomAttribute<AssemblyFileVersionAttribute>() with
    | null -> ()
    | fv -> printfn "  FileVersion: %s" fv.Version

    match a.GetCustomAttribute<AssemblyInformationalVersionAttribute>() with
    | null -> ()
    | iv -> printfn "  InformationalVersion: %s" iv.InformationalVersion
)