about summary refs log tree commit diff stats
path: root/t/01-seconds-to-str.rakutest
blob: 85c5076e93c08d909d2607e9d7ad85f74fcc470a (plain) (blame)
1
2
3
4
5
6
7
8
9
10
use Test;
use Taurus::Seconds;

plan 5;

is seconds-to-str(59), "59s", "Less than 60";
is seconds-to-str(3599), "59m 59s", "Less than 3600";
is seconds-to-str(86399), "23h 59m 59s", "Less than 86400";
is seconds-to-str(86401), "1d  0h  0m  1s", "More than 86400";
throws-like { seconds-to-str(-1) }, Exception, message => /:s Constraint type check failed in binding to parameter/, "Negative Int check";