Speed Test Pi

using Distributions
using Requests

function main()
  while true
    result = speedtest()
    out = """$(result["timestamp"]),$(result["serverinfo"]["city"]),$(result["serverinfo"]["ip"][1]),$(result["serverinfo"]["fqdn"]),$(result["serverinfo"]["site"]),$(result["upload"]),$(result["download"])\n""";
    f = open("/home/pi/speedresults.csv", "a")
    write(f, out)
    close(f)
    s = rand(Poisson(10))*60 + 60.
    println("Sleeping for $s...")
    sleep(s)
  end
end

main()