Anonymous user
Retrieve and search chat history: Difference between revisions
→{{header|F_Sharp|F#}}
(Tcl 8.x and Jim Tcl: Account for time zones) |
|||
Line 85:
=={{header|F_Sharp|F#}}==
<lang fsharp>#!/usr/bin/env fsharpi
let server_tz =
try
// CLR on Windows
System.TimeZoneInfo.FindSystemTimeZoneById("W. Europe Standard Time")
with
// Mono
:? System.TimeZoneNotFoundException ->
System.TimeZoneInfo.FindSystemTimeZoneById("Europe/Berlin")
let get url =
let req = System.Net.WebRequest.Create(System.Uri(url))
Line 98 ⟶ 107:
let genUrl n =
let
let server_dt = System.TimeZoneInfo.ConvertTimeFromUtc(day, server_tz)
let timestamp =
sprintf "http://tclers.tk/conferences/tcl/%s.tcl" timestamp
Line 114 ⟶ 124:
printfn "Usage: %s literal" (Array.get x 0)
System.Environment.Exit(1)</lang>
=={{header|Python|Python 3}}==
| |||