1 files changed, 8 insertions, 0 deletions
diff --git a/lang/thinkraku/human-seconds.raku b/lang/thinkraku/human-seconds.raku
new file mode 100755
index 0000000..610213e
--- /dev/null
+++ b/lang/thinkraku/human-seconds.raku
@@ -0,0 +1,8 @@
+#!/usr/bin/env raku
+# Exercise 4.1
+sub MAIN(Int $seconds=240_000) {
+    put 'Days: ', $seconds div 86400;
+    put 'Hours: ', $seconds div 3600 % 24;
+    put 'Minutes: ', $seconds div 60 % 60;
+    put 'Seconds: ', $seconds % 60
+}