3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-12-25 04:02:37 +01:00
pbot/modules/ago.pl
2021-07-10 15:00:22 -07:00

16 lines
269 B
Perl
Executable File
Vendored

#!/usr/bin/env perl
# SPDX-FileCopyrightText: 2021 Pragmatic Software <pragma78@gmail.com>
# SPDX-License-Identifier: MIT
use Time::Duration;
my ($ago) = @ARGV;
if (not defined $ago) {
print "Usage: ago <seconds>\n";
exit 0;
}
print ago_exact($ago), "\n";