Lp 1860068: Clarify README for Debian Buster
[OpenSRF.git] / src / perl / t / 09-Utils-interval_to_seconds.t
1 #!perl -T
2
3 use Test::More tests => 9;
4
5 BEGIN {
6         use_ok( 'OpenSRF::Utils' );
7 }
8
9 is (OpenSRF::Utils::interval_to_seconds('1 second'), 1);
10 is (OpenSRF::Utils::interval_to_seconds('1 minute'), 60);
11 is (OpenSRF::Utils::interval_to_seconds('1 hour'), 3600);
12 is (OpenSRF::Utils::interval_to_seconds('1 day'), 86400);
13 is (OpenSRF::Utils::interval_to_seconds('1 week'), 604800);
14 is (OpenSRF::Utils::interval_to_seconds('1 month'), 2628000);
15 is (OpenSRF::Utils::interval_to_seconds('1 year'), 31536000);
16 is (OpenSRF::Utils::interval_to_seconds('1 year 1 second'), 31536001);