test --last-minutes 5

Build.PL

@@ -15,9 +15,10 @@ my $builder = Module::Build->new(
         'Pod::Usage'   => 0,
     },
     test_requires => {
-        'Test::Output' => 0,
-        'Test::More'   => 0,
-        'FindBin'      => 0,
+        'Test::Output'   => 0,
+        'Test::More'     => 0,
+        'Test::MockTime' => 0,
+        'FindBin'        => 0,
     },
     create_makefile_pl => 'traditional',
 );

t/03last-minutes.t

@@ -0,0 +1,23 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use Test::MockTime qw(set_absolute_time);
+use Test::More;
+use FindBin qw($Bin);
+use lib "$Bin/lib";
+use Test::Dategrep;
+
+set_absolute_time(1395580908);
+
+$ENV{DATEGREP_DEFAULT_FORMAT} = '%Y-%m-%d %H:%M';
+
+test_dategrep [
+    '--last-minutes=5',"$Bin/files/test01.log"
+  ],
+  <<'EOF', 'test --last-minutes 5';
+2014-03-23 14:16 line 1
+2014-03-23 14:17 line 1
+EOF
+
+done_testing();