diff options
Diffstat (limited to 'thinkperl6/human-seconds.p6')
-rwxr-xr-x | thinkperl6/human-seconds.p6 | 8 |
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 -} |