3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-18 01:49:53 +01:00
pbot/modules/ago.pl
Pragmatic Software 4d023df17d Added "ago" module
2010-06-23 01:23:38 +00:00

13 lines
157 B
Perl
Executable File

#!/usr/bin/perl
use Time::Duration;
my ($ago) = @ARGV;
if(not defined $ago) {
print "Usage: ago <seconds>\n";
exit 0;
}
print ago_exact($ago), "\n";