about summary refs log tree commit diff
path: root/thinkperl6/human-seconds.p6
diff options
context:
space:
mode:
authorNguyễn Gia Phong <mcsinyx@disroot.org>2021-02-28 17:25:57 +0700
committerNguyễn Gia Phong <mcsinyx@disroot.org>2021-02-28 17:25:57 +0700
commit67bb27e9f5beec4d8ca0a6c29f045d5f23d6f40f (patch)
treeb677228d71b638dd6e423b037311ef0913ba66e7 /thinkperl6/human-seconds.p6
parentee9b8fc921f48dc893808e1c9dbfbef321aa362c (diff)
downloadcp-67bb27e9f5beec4d8ca0a6c29f045d5f23d6f40f.tar.gz
[lang] Reorganize language learning archive
Diffstat (limited to 'thinkperl6/human-seconds.p6')
-rwxr-xr-xthinkperl6/human-seconds.p68
1 files changed, 0 insertions, 8 deletions
diff --git a/thinkperl6/human-seconds.p6 b/thinkperl6/human-seconds.p6
deleted file mode 100755
index a7b2165..0000000
--- a/thinkperl6/human-seconds.p6
+++ /dev/null
@@ -1,8 +0,0 @@
-#!/usr/bin/env perl6
-# 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
-}