aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <mohammad.anwar@yahoo.com>2022-07-27 20:37:01 +0100
committerMohammad S Anwar <mohammad.anwar@yahoo.com>2022-07-27 20:37:01 +0100
commitf168a24c6f6e83362aece3e5ff6d483ed749a538 (patch)
tree8ec91a7d838aac309fb5a159c3b3dc8c1b46cd2d
parentfea96da09f919fc863c0a04e4b237e6aeed297a9 (diff)
downloadperlweeklychallenge-club-f168a24c6f6e83362aece3e5ff6d483ed749a538.tar.gz
perlweeklychallenge-club-f168a24c6f6e83362aece3e5ff6d483ed749a538.tar.bz2
perlweeklychallenge-club-f168a24c6f6e83362aece3e5ff6d483ed749a538.zip
- Added guest contribution by Robert DiCicco.
-rw-r--r--challenge-175/robert-dicicco/julia/ch-1.jl45
1 files changed, 45 insertions, 0 deletions
diff --git a/challenge-175/robert-dicicco/julia/ch-1.jl b/challenge-175/robert-dicicco/julia/ch-1.jl
new file mode 100644
index 0000000000..5ffe04fe6e
--- /dev/null
+++ b/challenge-175/robert-dicicco/julia/ch-1.jl
@@ -0,0 +1,45 @@
+#!julia.exe
+
+using Dates
+
+# AUTHOR: Robert DiCicco
+# DATE: 2022=07-26
+# Challenge 175 Last Sunday ( Julia )
+
+function checkArgs(args)
+ global year
+
+ try
+ year = parse(Int64, args[1])
+ catch
+ println("Error: Tear must be an integer >= 1900")
+ exit(0)
+ finally
+ if year < 1900
+ println("Error: Year must be >= 1900")
+ exit(0)
+ else
+ main(year)
+ end
+ end
+end
+
+function LastSunday( yr, mth)
+ td = Dates.Date(yr,mth,1)
+ ld = Dates.lastdayofmonth(td)
+ wd = Dates.dayofweek(ld)
+
+ if wd == 7
+ println(ld)
+ else
+ println(ld - Dates.Day(wd))
+ end
+end
+
+function main(year)
+ for mth in 1:12
+ LastSunday(year,mth)
+ end
+end
+
+checkArgs(ARGS)